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REGISTRATION AND SUBSCRIPTIONS 



Customers must register as a Business Service II the telephone number nominated lor the use 
ol the VIATEL Service Is a Business Service and/or VIATEL is to be used wholly or mainly for 
Buslness, Commercial, Industrial, Professional or Government purposes. (Charges incurred 
on Business Services are usually tax deductible.) 



Where a Business Telephone Service to nominated for the me of VIATEL, but the use of VIATEL 
Is wholly or mainly for Non-Business purposes, the Customer may be registered as a Non- 
Business VIATEL subscriber, providing the registration Is taken out In the Customer's personal 
name and address and not a Business name. 



Telecom Australia will register the Business or Individual named under Section 1 as a 
Customer of Us VIATEL Service and will provide the Customer with a confidential Customer 
Identity Number and Personal Password by mall. 



Where billing address is indicated, bills and bill related correspondence ONLY will be 
forwarded to lhat address. All other correspondence will be forwarded to address under 
Section 1. 



Customers should advise VIATEL of any change of address as soon as possible. 



II you lose your Customer Identity Number and/or Personal Password, you must advise 
VIATEL in writing before new numbers are Issued. Our postal address Is: Freepost 20, Box 
1B8C, GPO Melbourne, Vic. 3001. FOR SECURITY REASONS REPLACEMENT NUMBERS 
AND PASSWORDS CANNOT BE PROVIDED OVER THE TELEPHONE. 



Customers of VIATEL acknowledge that their name and registered VIATEL Number will appear 
on the VIATEL Mailbox Directory and that Service Providers and/or other registered VIATEL 
users may send messages to their VIATEL number. 



Telecom Australia undertakes no responsibility in relation to the accuracy of the information or 
service provided by Service Providers on VIATEL. Telecom Australia will not be responsible for 
any loss or damage arising out of or in any way connected with the use of this information or 

service- 



Attention is also drawn to the terms and conditionsgoverning the provision of information and 
services by some Service Providers. These terms and conditions may, in some cases, include a 
disclaimer absolving the Service Provider from liability regarding information and services 
supplied on VIATEL. The means of accessing these terms and conditions is set out on the 
Service Provider's Index Page on VIATEL. 



Should you require any changes to your existing telephone equipment (e.g. new exchange 
line, additional socket), please contact your local District Telecom Office. 

In a small number of cases VIATEL reception maybe unsatisfactory. Correction may incur an 
additional charge. 
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Conference 

This magazine was prepared 
against the backdrop of 

preparations for the Conference, 

so one or two features are 

either subtended or olsslng. 

We'll make up for that in an 
Issue to cone! 

Being pretty close to the 
Tandy world 13 always exciting 
and I guess I sometimes don't 
tell you as much about It as I 
should. 

This job Is highly 

stimulating, because Tandy 

always have new things 

happening, new plans in the 
making and new products being 
released. 

And they are a company which 
likes to consult with their 
customers. 

We get consulted often, but 
when I'm visiting with them, it 

Is not unusual to hear a Tandy 
buyer say that he wants to talk 
to a few customers before he 

makes a decision. 

As I've sail before. If you 
have a comment to make on a 
product - and don't just make 
negative comments - call Wilfred 
Egert at Tandy on 02 675 1222. 

The plane for Conference are 
complete. Its going to be a 
different conference this year. 

Probably less structured, less 

formal than previously. Bit of 

an experiment actually - but we 
think It will be great. 

It will certainly be the 
place to see Just what this CoCo 
3 ie all about! 

And what the MS DOS world is 
all about too. 

In that world, we'll have 
TlOOOSX's, TlOOOEX's and 

T3000HD's there to show what 
they can do, and to put thru 
their paces. 



We'll be updating Viatel from 
there, and you'll see how our 
new software strips the frames 

off the Viatel Kailbox eystea 
and allocates them to the 
various bulletin boards - a 
complex piece of programing 
which our users on Viatel well 
know is yet to be finally 
resolved! 

Anyway, enough of conference, 
read all about it In the Conf 
'87 section further in the mag - 
oh and please note that some 
costs for conference have 
changed - downwards - due mainly 
to Johanna Vagg. 

She told me to do it, and I 
did It - I naau I wouldn't be 
game enough HOT to do anything 
she tells an to do! 



The New CoCo 3 Software. 

Ve' ve noted before that any 
new computer by definition will 
not have much in the way of 
eoftware available for It 
initially. 

Go to Blaxlancl Computer 
Services today for CoCo 3 
software however, and you can 
choose fron: 

* Lyra, an 8 voice nuslc 
synthesiser; 

¥ Symphony 12, a Kusica 2 
compatible 12 voice synthesiser 
for the CoCo 3; 

* Color Kax with hi res 
joystick - CoCoMax with colour 
for your CoCo 3 at Just S120 for 
the Colour Kax and $20 ior the 
hi res Joystick - a progran to 
justify the purchase of the CoCo 
3 by ltselft 

* The Vizz - a full terminal 
package, very intelligent with 
heaps of functions not possible 
on some other computers; 

* DeskKate 3 - At last 
someone' s got it! 

* Koronls Rift - a flight 
simulator graphix adventure 

game; 

* VI Id Vest - a western 
adventure ; 

* Hagic of Zanthe - an arcade 
adventure; 

* Nuke the Love boat - a 
Joystick adventure with 
pull-down menus; 

* IKS - a 4GL data base; 

* Sculptor - for big business 
- software you write on your 
CoCo 3 using Sculptor can be 
ported to 40 different computers 
including the VAX mainframe; 

* Dyna Star - a nultl user 

Vord Processor Package for CoCo 
3; 



* Screen Star - an I BX 
Wordstar look alike for the 
CoCo3. 

These packages are Just the 
start. True they have been a 
long time coming, but then each 
one has been worth the wait, 
each one is significantly "better 
than anything you've used 
before. 

Don't forget... our phone 
number is different! 

Some people are still 

experiencing problems contacting 
us by phone. 

Please note, our phone number 
1g 076 30 61771 

Adelaide. 

OK - I give inl I didn't get 
to organise anything with the 
Adelaide contacts or in fact 
with regard to the Adelaide Bash 
we have planned for Hovenber. 

I'll have to try to do it 
this menth - sorry! 

End of Year Party. 

I*W been asked often lately 
about the end of year Bash we' 11 
be holdling here on the Gold 
Coast. Seems there wilt be a few 
coming from the further reaches 
of Australia! 

So OK, the Bash Is on the 
weekend of 12th December. 

You can stay at my place (on 
the floor) or probably at other 
places around the Coast - we'll 
let yov know. 

The aim Is to set up on the 
beach en Saturday, Ve* 11 have a 
BBQ tea, and then we party right 
thru the night! 

Heedless to say, there are 
other things to do here, we'll 
probably go to Seaworld on 
Saturday too, and there's always 
the surf - so plan to be here 
for a fun weekend - Its going to 
be great! 

The Amiga and THAT 
Article. 

Kany people have told me that 
last month's magazine was the 
best vie've ever done, except 
that it was spoilt by THAT 
article. 

The article they are refering 
to Is the article by Walter 
Zanbotti. 

Ve often print things with 
which we don't agree, and 
recently got into strife with an 
author for saying so. So this 
time we thought we'd let our 
readers Judge the article. 



Veil you've done that 10 to 1 
against the article, and as of 
next month we'll publish some of 
your replies as well as a point 

for point comparison. 

The botton Line is, in the 
view of the majority, dollar for 
dollar, the CoCo 3 stacks up 
against the Amiga 4 topples It. 

The point we make i6 that a 
computer is one tenth hardware, 
four tenths software and 5 
tenth© support, 

Since the CoCo first 

appeared, there have been many 
good computers released on the 
market which have cone - and 
gone. 

Technically they have had 
6ome features which exceeded the 
capabilities of the CoCo, but 
the market made the judgement 
that they were not sufficient, 
because most of these computers 
now no longer exist. 

I don't know how long the 

Amiga will last, or even if it 
will outlast tha CoCo. Vhat I do 
know is that the company which 
makes It has a reputation for 
not supporting their users and 
for changing standards in mid 
stream. That alone makes the 
machine a highLy questionable 
purchase. Once you 6tart to look 
at other things, like the volume 
and depth of support that 
surrounds the CoCo, the low 
price of entry, and the exciting 
software which is becoming 
available* it Is very difficult 
to give terribly much credence 
to Walter' s article. 

Un fairness to Walter, he 
wrote the article sometime 
before it was published and it 
reflects the problems he 
experienced in his area, many of 
which may not be so critical in 
the larger cities of Australia.) 

The only other thing I want 
to say at this stage is that 
last month's magazine In Itself 
refuted much of what Walter 
said. 

There la Blaxland's release 
of definative new CoCo3 software 
In that mag; there is a volume 
Of good CoCo 3 software in that 
magazine, and finally, the 
magazine reflects the strength 
of the Colour Computer 

community. 

In future in Softgold r we are 
going to list as aon; Users 
Groups for as many computers a6 
we can find. (Other users need 
support too!) You watch, without 
being biased, I doubt you'll 
find we ever have as many groups 
listed for other computers as 
there are for Tandy computers. 



You may or may not think of a 
Users' Group as being important, 
but I can assure you, that 
without then, this magazine 
would die, the supply of 
programs would die, and the 
knowledge pool would dry up. 

The Users' Group is the 
barometer of a computer's real 
health, and that is why we have 
always placed ultimate value in 
them. 

Amiga? Bo thanks, I'll stick 
with my CoCo 3! 

■ 

Users' Group News. 

We'll have a bigger section 
next month to cover what we 
didn't print this month. 

Unfortunately with conference 
upon us, we have not had time to 
compile the news or the changes 
of numbers this month. 

As I said earlier however, we 
plan to incorporate in Softgold 
(not in CoCo mag though), 
listings of Users* Croups right 
across Australia for all 
computer types. 

It is apparent from our 
Involvement in Wiatel, that such 
Information is difficult to cone 
by, and that this is something 
we can do for those of you who 
purchase this magazine thru 

Viatel. 

So if you are a member of any 
computer club not listed, please 
let me know your club details 
and we'll get them into next 

month's mag. 

Goldlink this Month. 

Coming \ip this month we have 
a few changes. 

Ve have some new boards 
starting in Inner Circle, as 
well as two new public boards. 

Ve have several new Databases 
starting 6Qon - a big new one 
for the Commodore users, and 
some new info for the Amstrad 
users, and an Increased CoCo 3 
section. 

Its Just on 12 months since 
we began our service on Viatel, 
and during that time we've risen 
through the ratings to the 
number 3 slot. 

Ve are continually reviewing 
our service, and whilst our 
system has suffered from the 

unreliability of the update 
software we've been using, we've 
been able, through all the 
mixups, to attain an 

understanding of what we can 
achieve with it. 

Ve are involved with Viatel 
on levels other than those which 



effect user 6, and some of that 
involvement will benefit you all 

shortly in the form of 6implifed 

up A down load facilities. 

Ve've never been satisfied 
with this aspect of Viatel, but 
60on, new software will be 
available which will change all 
of this, Kore hopefully next 
month. 

On the social scene, this 
month I met with some of our 
users in Melbourne for a quiet 
evening meal. 

Of course whan Voodrow turns 
up at anything like that, the 
concept of 'quiet' Just floats 
straight out the door, but it 
was fun anyway, made even better 
because Lelsa was also there - 
along with EP, Vino, Big X a his 
lovely lady. The Maltese 

Sparrow, Princess Cygnus a 

fiend, Hantlcore, and several 
others whose names I forget - 
sorry to them. 

Vas a great night, one of the 
funniest nights I ' ve ever spent 
actually! Let's hope we can have 
some more like it in the future! 

The Tandy Store Award. 

As you would know, we get 
letters recommending Tandy 
Stores and staff often, and the 
store which rates beet in this 
is Pat Drennaa's store in 
Vestern Australia. 

Ve consistently get letters 
such as the one in the letters 
section this month about this 
man, and we've come to the 
conclusion that he can't be 
writing them all himself, so. . . 
big pre conference announcement 

here Pat gets the Tandy 

Store Award for August and for 
1987. 

Ve congratulate you Pat, and 
your staff - we expect a photo 
of you all by the way - and on 
behalf of the Tandy Computer 
Users of Australia, we thank you 
for setting such a high standard 
lor the other stores to follow. 

Pat, on the days when you 
wonder whether you want to be 
bothered, or on the days when 
you have to cop some customer's 
abuse for something you didn't 
do, remember us, the Tandy users 
of Australia, who really do 
appreciate what you do. 
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NEED HELP? Write to Graham, to Dr CoCo or leave 
a message on Viatel and we'll do our best to answer 
your enquiry in these columns as soon as possible. 



Dear Graham, 

1 was reading one of my back 
copies of "Austral Ian Rainbow" 
(January 1987 > and I came across 
an article entitled "Hamming It 
Up" on pa*e 30 about the Packet 
Radio. 

This really interested me 
because t cannot afford to run a 
modem. Could you please send me 
some more Info en the Packet 
Radio, eg where I could purchase 
one from, where can I contact 
somebody uslnR one, etc. 

I was also reading March 1986 
"Australian Rainbcw" and I came 
across what sounded to be a very 
useful program - it wa& entitled. 
"An easy way to run your 
programs". There was just one 
little problem - it referred to 
a program by Roger Schrag's 

called "A Special Use for the 

DOS Command". Then in brackets 
It had November 1984, Page 140. 
I flicked through my back copies 
of Australian Rainbow and found 
November 1984. The last page 
number was 64, so I could not 
use this very useful program. 
Could you please send me the 
listing of "K Very Special Use 
for the DOS Command?" 

Peter Thomas 

9rantvllle, VIC 

Feter, 

Unfortunately references to 
page numbers in American Rainbow 
often eluded us when we were 
diking the Australian version, 
and it would appear that the 
article you seek is an article 
that we did not print in the 
Australian version. The month 
and page number reference refer 
to American Kainbow t not to 
Australian Rainbow. 

As we no longer maintain ties 
with Falsoft we cannot assist 
you with this article. Sorry. 

Graham 



Dear Graham, 

Could you find out if anybody 
has prOKranu»ed the game of 
patience - if so where could I 
get a hold of it. A friend of 
mine has an Amstrad with that 
game. 

L.D.V Bartell 



/ know of no game of patience 
available for the CoCo (other 
than any programming you sight 
do). 

You could contact Computer Hut 
Software in Bowen who import 
games from the US - perhaps they 
may have a commercial version. 

Alternatively if juu think 
about it for ten mfuutes, it 
really shouldn't be that hard to 
write one. 

Graham. 



Dear Graham, 

Do you have a complete index 
llctin* of Iho prograa* found in 
CoCo and Rainbow indicating in 
which magazine the listing may 
be found, or more importantly, 
the instructions for them. Ve 

have a large number of these 

programs in our library and a 
ready reference to the programs 
origin would be most useful. 

Rill Sndw, 

Kaitland Users Group 

Bill, 

A full listing of all CoCoOz 
programs is printed every 

January in Softgold Magazine 
{Australian GoGo In 1984, 19d5 
and 1936). 

Whilst various databases 
referencing Rainbow material 
have been sent to us, we've not 
been in a- position to publish 
one, firstly due tc the space 
problem and secondly because of 
Copyright problems with the US. 

Clubs running librarys should 
be very aware that Falsoft will 
not countenance their products 
on library shelves. 

Grahsm 



Dear Graham, 

Like Bob Kline (SoftRold May 
pg 4) I had trouble with "Air 
Raid" and wrote to Barry Cawley 
about it. I still haven't seen a 
reply. 

Also, I have had trouble with 
"!>isk Organizer". 

Since that first letter, I've 
taken out a 12 month 
subscription and also like Bob 
Milne I'm beginning to doubt the 
wisdom of this as most of the 



few programs I've seen since 
have been in Pascal which is a 
foreiga language to me at the 

moment . 

I may get into Pascal one day, 
but for the present, I'm having 
enough trouble with Basic. 

Since I wrote the first 
letter, I've had an update from 
Tandy of ay DOS to KSDOS CTandy) 
02-11-24 and Basic 01-02-00 and 
the problems with beep and sound 
have been fixed. I've tried "Air 
Raid" with the new DOS, but the 
arrow keys still don't move the 
gun. 

I do enjoy reading Softgold 
but I would like more T1000 
programs and not too much 
Pascal. I thought that when CoCo 
became Softgold, It would become 
a lot more T10O0 orientated. 

Yours Sincerely, 

Roy Little 

HcKlnnon, VIC 



Roy, 

As I've said so many times, 
I'm happy to print as many TZO0O 
programs as 1 can, but J can 
only do that if I get them sent 
to me by our readers. 

As soon as a T10O0 program 

arrives, it goes straight into 

the magazine. 

I g^mss the real situation is 
that most of you who own T2000 

are still getting used to your 

machines. 

As for Pascal J make no 
apology about its use in the 
magazine. Like QS-9 level II for 
ths CoCo 3, Pascal seems to be 
the "natural" language for the 
IBM's, and we encourage you to 
purchase a Pascal compiler such 
as Turbo Pascal and try to 
understand how that works. 

It happens that next month 
there will be at least one Basic 
program for the T1000 along with 
more Fascai programs. 

Ve are very keen to obtain 
some rascal tutorials for this 
magazine from anyone who can 
supply same. 

Graham 



Dear Graham, 

Thank you far the CoCo 3 tape. 
1 couldn't wait to look at It! 
But what'© this - a Kangaroo 
without a tall? "3Kanga", that's 
what! And the choice of 
background was less than 

pleasing ... (Tall In line 45, 
no *H' added to 'DRAW ... then 
also needs painting ... 

personally I would HCLS to 
colour for Kanga, then HPAIIT 
background) . 

Disappointing is a mild word 
for what I felt when I ran 
"3Kldst". I was proud of 
"Kidstuff" ... not so "3Kldst". 

Hunpty is a terrible colour; 
ha does HOT fall off the wall; 
the sky in "Twinkle" is green!!; 
"Twinkles" music is LOV because 
the P0KE65495.0 doesn't work; 
the MICE are really YEECH! ... 
their tails don't even reach 
their bodies . . . and at the end, 
it tries to RUH again and gets a 
?DD ERROR!!! 

The tape arrived 17 hnurs ago. 
1 spent a couple (at least) of 
those hours, re-converting 

"3Kidst". 

Ve've had a 06 hour bug here 
... what's that, you ask? Veil a 
96 hour bug Is a 24 hour bug 
going through four kids. I hope 
it doesn't turn into a 168 hour 
bug! 

Today is presentation day for 
Forbes Horth Primary. 

Monica (in year 6) took out 
two awards. One for excellence 
In all subjects and another for 
quiz, ie general knowlege. She 
is the youngest (11.5 this week) 
and tallest in year 6! 

Richard got a certi floats for 
excellence in mat hematics and 
Peter recieved one for 

Proficiency in conputers. (Peter 
acts the dummy with the 
conputers at hone).- Richard Is 
In year 2. 

I read in the paper that 
Michelle (year 7) will be 
getting an award for Outstaadlng 
Effort in Social Science. She 
got a Distinction in a Maths 
Competition this year! 

Monica got distinction in two 
maths competitions. 

Yes, I am proud of then . . . 
they were disappointed with 
"3KIDST" too, by the way. They 
helped me with it early in 1984. 
Keep trying . . . 
Johanna Vagg 
Forbes, HSV 
Johanna, 

That first CoCo 3 tape/disk 
was put together very quickly 
when we first obtained a CoCo 3 
early on. 



It was never meant to be a 
compilation of definitive CoCo 3 
programs, but rather a series of 
thought starters. 

In fact after this month we 

will be withdrawing that product 

fron our catalogue as It has no* 
served its purpose and 'there 
are many better programs around 
for the CoCo 3. 

Id the case of the programs 
converted from programs by you 
and your children, the aim was 
merely to show ttbat can be 
achieved colaurwlse whea a CoCo 

2 program is moved into the CoCo 

3 mode. 

I'm glad that you A your 
children are flue aud dulnx no 
well at school - and I hope you 
don't see this after the 
conferencet (Little private Joke 
with Johanna! ) 

Graham 



t 



Driar Graham, 

Maybe this subscription will 
help alleviate the log-off 
blues, and stop me from getting 
drunk every time I feel like 
logging onto Viatel. Alcoholism 
is only a bit better to 
Viatelahalism. 

Gotta go - I off to see my 3 
matGG, Jim, Jack, JnKnny and 
Douglas. 

Kindest Regards, 
Den Vhitton or 
Fruitbat (whichever comes 
first . . . ) 

Ps 1 saw the photo of dBAUCH2. 
He doesn't look very silly, 
which surprised me because some 
of the letters he sends me would 
indicate otherwise. 

Bye . . . 

Den 

Hi Fruitbat, 

Ve miss you on vlatel but your 
letters are more fun! 

Graham 

* 

Dear Graham, 

Congratulations on your fine 
magazines. I have decided to 
once again re-new my 

subscription with your Softgold 
magazine, far a further 12 

months. 

I have not switched to the 
Australian CoCo, even though I 
would like to, as I an 
considering purchasing a Tandy 
1000SI In the future, and even 
though It will probably be a 
while before I save enough money 
to purchase this computer, I 



consider that the Softgold 
magazine to be an invaluable 
help. 

Vhen I do purchase the Tandy 
1000, it will be a great help la 
getting started and 

understanding the new computer, 
as it ie very different to the 
Colour Conputer. 

I would also lave to recieve 
your CoCo magazine as I would 
find it more of a help at the 
present, while I'm using the 
CoCo, but unfortunately, as a 
student with no Job, I really 
couldn't afford both. 

It would be great, if you 
could provide a discount for 
people In my situation. 

These Tandy stores that are 
receiving the award that mention 
each month your magazine — how 
do they compare with Pat 
Drennen's 6tore??? 

I would say that he would beat 
them hands dow. His help, 
friendliness, service and Tandy 
store la unbeatable over here in. 
the west! 

He will also go out of his way 
to help you, and always tries to 
give you the best deal possible. 

For example, he never 

pressures you into buying 

anything; I once went to him in 
the hope of buying a Word 
Processor and he told ne about 
the ones he had in the shop, and 
told ne what were the best <and 

the best were not always the 
most expensive, which Is what 
most people always try to sell 
you) and he even told ae that 
one of his other customers was 
selling a very good Word 
Processor! 

He told ne the price, and Rave 
me his telephone number. 

Have you ever net a person 
that was prepared to give up a 
sale (and his profits), 

renembering that there was 
nothing in it for bin? 

Io? - well I have — Pat. 

1 think that be well and truly 
deserves a stcre award, and a 
very good write up in your 
magazines. 

Also, It would be a good idea 
if the people In "Marthas 
Trading Post" had their 

addresses printed, as a phone 
call to soma of these people 
would be very expensive, 
especially if yoj live over here 
in the west, 

Thank you, 

Grant Kenner 

Parkwood, VA 



Grant a 

The point is taken about Pat, 
who works very hard to make sure 
that his cvstomrs are always 
satisfied. 

He's a j?ood man but I'm not 
going to tell bin thatl 

And the point is also taken 
that it's probably time for a 
special subscription price to 
the nags so as a conference 
special we will offer a "this 
month only" price of S60.00 far 
a 12 month subscription to both 
magazines. 

Graham 



Dear Graham, 

I am a a invalid pensioner and 
have recently bought a 

second-hand Tandy TRS-80 

computer 11- I an by no means an 
expert, Just a very 

inexperienced learner. 

I have bought a few of your 
magazines as I have taped all 
the programs In ny manual. I 
only have 16k of memory and a 
tape cassette. I an trying 
programs out of your magazine 
suitable for 16k, as I find 
computer books too expensive, 
being on the pension. 

I noticed in the back of the 

magazine marked Vol 3 - June '$7 

an advert for 'Vast's on the 
Best of CoCoOz". 

I wish to knew whether these 
are tapes of programs or 
listings as there are a few 16k 
tapes i would be interested in. 

Also, if they are tapes, do I 
insert in the datasette and 
sinply type in "CLOAD" as Items 
are listed in your ad, or what?? 

Also, where do 1 send for 
these programs and how ouch for 
postage a handling. 

Hoping you can be of 
assistance. 

Tours sincerely, 
Graham Blpblck 
St Harys, BSV 



Ps, are the programs listed In 
CoCo suitable for a Tandy 
TRS-80, as I haven't tried any 
prograsm listed yet. 

Thank you. 



Graham, 

Our address is PO Box 1?42, 



Southport, Queensland, 4215. 
Anything you need for your 
colour computer can be obtained 

by writing to us at that 

address. 

The Best of CoCoOz series are 

a series of tapes or disks. 

Each tape or disk has the 
programs listed Id the back at 
the magazine on it. For example. 
Best of CoCoOz il - Education 
has; 



* Roadqulz 

t Sha remarket 

* Hangman 

* Austqvig 
t Alphabet 

t Spelling Tutor 
t Tank Addition 

* Fraction Tvtor 
t Tables 

* Icosa 

* Kidstuff 
t Taxman 

t FlagQUlz 

. . . all on the one tape. 
You load <or in the case of 

tape systems, CLQAV) each of the 
programs listed above into your 
computer from the disk or tope, 

Each of the programs that 
appear oa the "Best of CoCoOz" 
series are programs which were 
presented at an earlier time in 
previous magazines. Each has 
something to teach us and in 
many cases, we consider many of 
the prostrates to represent 
Important points In programming. 

1 would suggest that with 64k 
upgrades being so inexpensive at 

present, that you consider 
upgrading your 16k computer. 
This is the single most valuable 
thing you can do to Improve the 
net worth of the computer to 
yourself. 

The CoCo te ths single most 
powerful 16k computer in the 
land - there is do doubt of 

that. But when you give it some 
more memory, it's Just amazing 
what it can achieve! 
Graham 



Dear Graham, 

1 have been an avid reader of 

bath your magazines for over a 

year now and although I find 
them informative and educational 



I feel that I must make some 
hopeful ly construct ive 

criticisms. 

Firstly in the middle of last 

year you gave an undertaking 

that all O's (zeroes) would be 
slashed in future editions. The 
only slashed zeroes I have seen 
to date have been In the 
programs for the T1000 users. 

Secondly the use of three or 
four different type sizes In 
each Issue Is quite 

disconcerting - please, please - 
settle on one size (preferably 

standard printer size> and stick 
to it. 

Thirdly the number of spelling 
mistakes in recent issues is on 
the Increase and 1 feel sure 
that the people who submit 
programs and articles to both 
magazines must be dismayed by 
these errors. 

I do realise that you must all 
be extremely busy people with 
your many diverse interests and 
talents and as I mentioned 
earlier my comments are meant to 
be constructive, as I, like many 
other6, do appreciate your 
efforts. 

Yours Sincerely 
Bill Huxley 
Kallnga, QLD 



Bill, 

The undertaking- we gave with 
regard to the slashed zerces was 
made prior to the time when we 
started using the DKP-130 
printers. 

At that time, we used C. Itoh 
8510 printers which were very 
fast and had selectable zero 
styles. In approximately January 
1986 we switched to the DHP-130 
which does not have a slashed 
zero option. 

Ve feel that this disadvantage 
is outweighed by the more modern 
typesxyle which makes for easier 
reading. 

I agree about the type size, 
and we are trying to maintain a 
slnjrle size. Sometimes we would 
have to leave information out, 
if we did not compress it. 

Graham 
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Com Stetlon 642 Vlate 64290133A 

-.'liii.iu.ro Member 

753100130 TUB 30 SUM 1967 30:17 
HEVH Iht Gamers' Beard - »642916_ 

> Aa It In Computer night tnnlght, 
here aie io«- general hints a tip* for 

COPBpUtOr ::•-■-: ■ I 

1. Keep dlaks •, tapes w&en not in 
use, well away from power cords, any- 
thing electrical, especially TV mots. 
The lolt band side of the TV eat la 
often vote electromagnetic than IB* 
right es tbla Is where the high vsltege 
* in to b« found. (Diakt « tape of 
course store their info magnetically a 
sloctlcal lines have a magnetic Held 
around them which can rearrange your 
disk or tapel 



Com- Station 042 Vlate 642J0134A 

Clubrooai Meabar 

755100150 TUB 30 JUH 1087 20;23 
HEV1 1 The Gawrn' Board - *642«10_ 

> 2. Always disconnect the computer 
from tbs wall If you are going to opon 
tb» case- Tbmre con be. live or charged 
llnea Inside which can Injure you or 
worse still, Injure the> computer) 

3. Tape users should clean tb* heads 
of their taps deck, aa well aa the pine 
h roller every 10-12 houra of use as 
thrnae components critically effect the 
performance of the* unit- Don't skimp on 
tope quality for valued programs, tape 
performance m prlna. 



Cam Station 642 Vlate 642S0135A 

Glubroora Kenbei 

733100130 TUB 30 JUH 1987 30:26 
BEVli The Camera' Board - »642316_ 

► 4, Dandle dlskdrWem corefully. It 

Is preferable that you keep the card- 
board disk keepei - in the drives often 
'.I -■ ■ aie being moved aa the beads are 
easily damaged- In no clrcunstanca 
allow my noro Jolting than Ic absolute 
ly neces«nry. 

5. Ceep programs of different types 
on different tapeeS/dlske A* your 
ey&tem grows. It will become unmanaga b 
le II you do not control your library! 



Com Station 643 Vlate 6420014 U 

Clubrooaa Member 

755100190 TUB 30 JU« 1387 21:04 

VEV ! The Gamers' Board - »6*29l6_ 

> 6, At least try to grasp the rudloaen 
is of the Basic language. Its amazing 
howllttle knowledge It takes to get & 
lot from your computer 

7. Dne of tho most worthwhile purcha 
sea you can anhe Is a good, FAST print- 
er. As ■■;*.;-. ao nany things to do with 
computers, there 1r ao substitute for 
money spent on something like this. 
Consider printers In the- 100 GPS 
(Characters per second) range as being 
about the right speed/quality for homta 
u*e>. 



Con Station 042 Hare 64290136A 

Clubroom No aba r 

700813660 IUB 30 JU* 1907 20i3L 
BBUI ! The Gamers' Board - >642916_ 

> along the llnee of magnotleai - a 
magnet lm n good way to completely erase 
a disk (quickly* without n computer If 
tha need should arise I In aoae casec a 
disk will format after being; wiped by 
a magnet when previously at failed. 

(sounds sua I know bub It S0KGTIMBS 
worka) 

dBEST 2 



Va'vm found that tool Amaclngt It apnea 
ro that the magnet rearranges the 
particles? 



Tuesday night is 

computer night on 

Goldlink 

Com Station 642 



Com Station 642 Vlate 64290149A 

Clubroom "amber 

755100150 TUB 30 JUM 1997 21:32 
MHVt I The Gamers' Board - *042916_ 

> To lollaw on, a printer la essential 
wnen you ate programming. Finding error 
In code, eepeclally Basic code, can be 
accomplished &ft-Scre4n. but a printer 
really does sake short work of tha Job. 

Of course It alto opens the world of 
VP ^Vord piocesalngl to yoa too ft again 
far this job, the Caster your printer, 
the more you'll uao It Cor VP. 

These days, there are HLQ (Hear 
Letter Quality) dot matrix printers 
which are quite fast and very fast. 

For example* the Tandy DKP 130 or tha 
Epsom LX 60 



Com Station 842 Mara 64290138A 

Clubroom Member 

709813800 TUB 30 JUH 1967 20:46 
HBVM The Gamers' Board - *642910_ 

> G - the correct term Is "align the 

ciomai nc" I think. Who cares - It works! 

(eapoclally In Messy Doe machines! > 

Must have eonetbing to do with the 
strength of their writing field? Anyone 
know sore? 



tin ESI 2 
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Com Station 642 Xnra G4290139A 

Clubroom Member 

093003280 TUB 30 JUS 1907 20.4C 
■BW! | Tbe Ganera' Board - MJ429l*j_ 

> You' re not wrong about keeping prcgra 
aa of different typee on dlffeient d lake 
I -;■■---' 3 days "tidying up" the varlou 
a fllos I had In woidpiocesatng. It'samj 
azlng how many files 1 could have made a 
Impla charges to If I had had them all o 
A the ona disk - AID correctly catalogue 
d/ 1 Indexed. Always novo a file uwlng a nn 
me which you can unceratand and Is ralat 
ed to the content. I found I may have wr 
Itten about 10 rilee which were bos 1 coll 
y tha earns because either I couldn't fin 
d the pievlous file or the name I gave 1 
t did not r slate to Its contaata- 



Tes you mre probably correct, unfort- 
unately. 1 can't talk technical - we'll 
ac OFQ whan ha get as tiaial 



Com Station 042 Mars 6420O14BA 

Clubioon Heather 

726268890 TUB 30 JUP 1987 21:31 
■EWI I lha Cowera' Board - *642016_ 

> I don' t -ii ■" I thought "domains" wsa 
a an apartment house down at burislgh. 

It la also used I think to reference 
the pattern that the Iron or other magna 
tic material Is 1*19 out ah tha Mylar b* 
;■- In disks tapes a even Video. 

UFO 



Phsw. ..for a moment [ thought you 
dldn' t know! 1 



Com Station 042 Kara 042901371 

Clubroom Member 

063003380 TOE 30 JUM 1967 20:36 
■EVU Tha Gbmii' Board - *843Qlfl_ 

> Here's another hint - make eur« you a 
ctually cava any program/data ye've been 

working on and ALhAVS make a backup Ian 
edlatsly. Believe me, I'm talking from a 

very sorry •Kparlenae. 

VO0PR0V 



The back up is the Important thing, 
Its amazing Juet how oftan you use 



the ml 



(HI ya mate! ) 



Com Station 642 Venus 642901S4A 

Clubroom Member 

T2O290O?0 TUB 3-0 JV* 190? 22 1 til 

HEVI I The Gamers' Board - >642916 

) DB2 the reason tttat you may need to 
use a magnet on the disk Is thmt eomja of 

the Iron paitlcles stick together mnd c 
an't be realigned b/ the drive head Into 

a different pattent. The came la true 
of audio ft video* taps. 

UFO 




Dear Dr GoCa, 

I have two problems; 

One - there is a program 
called "Shorthand Key Utility" 
by Bernard Besasparis Oune '87 
CoCo P51). Thie program is only 
written in machine language 
which means you have to have 
EDTASH+. 

I don't have EDTASHt, and I 

would really love this utility 
to use. Can you or anyone at all 
please supply me with the Basic 
listing. 

I loved John Carmicbael' s 
program "Tisoesave" and would 
greatly appreciate this one. 

Two - "Gunfight" (nay '87, 
CoCo Pr 14). Are there any 
errors in this program? 

I always seen to get an ?QD 
Error in this program. I have 
checked It out but everything is 
fine. 

Gavin Stock 

Hth Blackburn, Vic 

Gavin, 

About your first problem - the 

Basic version of "Keyboard 
Shorthand" does not exist! It 
currently only exists in two 
forms - the version you see In 
the magazine and the version 
that resides ot CoCoOz monthly 
(in the form of a machine 
language program) . 

The best way (.and possibly the 
only, for now) for you to get 
your hands on this is by 
purchasing the CoCoOz for June 

198V. 

Vitfa your second program, 
there are no problems that we 
have encountered - perhaps there 
is one data statement that was 
overlooked in your listing? 

On the other hand (if you 
want) , you con get the CoCoOz 
tape for that month, too . . . 



* 



Dear Dr CoCo, 

Thank you for your help In my 
problems with "Colour Plus" by 
Brian Ferguson CAust CoCo, Kar 
•87 pp 37). 

Yes, I went through t.he 
program and charted all the "AS" 
variables to "Al" and this has 
made the program run 98%. 

But now I get a ?DD Error in 
line 930, but as far as I can 
see it Is only In the text 
section. I have pressed the 
Clear key but when I used the 



arrow keys to nove the cursor 

around one pixel I get this 
error. 

I have checked and typed the 
line over and over again and 
have also checked lice 1350 and 
a few lines before it, but no 
luck. 

1 hope I am not causing you 
any extra work with lav problems, 
but as I am retired now and this 
is my interest and while I am 
trying to learn to program, I 
will need help. 

Yours faithfully, 

Arthur Williams 

Harrington, HSV 

Arthur, 

Ro, you are causing me no 
extra work whatsoever -remember, 
this is my Job - to help you 
out. 

There Is a small enigma with 
this particular program, and 
that shall be discussed later. 
On to getting your program into 
operational order: the simplest 
trick for you is to edit line 
930 and insert a 'CLEAR2000:* 
before the rest of the line. 

That should defeat the ?DD 
error. 

Sow onto the small enigma. 

When we first received "Colour 
Plus", we examine the program 
from a simulated view, in other 
words, we ran the program to see 
whether or not stood up to what 
the instructions said it could 
do. 

low this particular one ran 
without a hitch - no errors, 

nothing! 

The conditions for this 

experiment, by the way, is that 
vou have to have a CoCo 3 with a 
DOS attached plus a copy of the 
software from CoCoOz on disk. 

law, try to 'RDIT 130*. You 
will notice that, at the end of 
the line, is a statement that 

goes , .. •AS-.AScasr. 

•AS' is a reserved word - in 
other words It is a word that 
Basic uses, so in Disk Basic you 
can't use it as a variable. Tape 
users can use it, but they stop 
disk users from using their 
program if they do. 

low extend the line (press 
'XM and type in . . . 'REM HI. 

Press <enter> and RUB the 
program. And what do you get? A 
?SF Error in 130. 

Haw, re-edit line 130 and get 
rid of the REM statement. 



And agaia, re-rua the program. 
Again, the ?SB Error comes back. 

It seems that the computer 
totally ignores the variable 
'AS' La line 130, until ycu have 
edited it. 

Now, why is this so? 

If anyone has any bright ideas 
on this subject, then we'd all 
like to hear about it ... 



Dear Dr CoCo, 

In August 1986 of CoCo. there 
are three programs by C.Bartlett 
which are configured for a disk 
systea. Can you help me with 
what is needed to configure them 
for a tape system? 

In the notes describing them 
on pape 16 there is a piece that 
says . i . 

11 ... please note that all 
these programs have been 

configured for a disk system. If 
you intend to use these programs 
on a non-disk system then the 
page select subroutine will have 
to be changed. Also the 

routines that POKB the new text 
screen" . 

I have asked the contacts 
close to ma but have been unable 
to find out what I need to Ret 
then to work properly. 

Geraldine Courtney 

Vodcnga, VIC 

Geraldine, 

I have tried to convert the 
abuve programs to run on a 
non-disk system, unfortunately 
the results are neRative. 

To irake these programs work 
effectively, one would have to 
have enough time to fiddle with 
the program. 

Unfortunately, we cannot offer 
any help or advice, except that 
you could ring Charles himself. 

His number is (079>-28-3771. 



* 



Dear Dr CoCo, 

I recently upgraded from the 
old grey case 64K to the CoCo 3 
with no advantage apparent in 
available K using Basic. Some of 
■V machine language programs 
will not run even with the disk 
drive disconnected and loaded 
from tape. 

Is there any way to overcome 
this? 

I have written (programmed) a 
Dungeon & Dragon type game which 
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involves the interaction of 
several programs on a disk 
which I will submit to you If 
you think you nay have use for 
it. 

It ie written in Basic; 
therefore any one with a little 
imagination could change the 
programs slishtly to give other 
adventures. 

Monsters and treasures to nave 
randomly around an adventure 

naze. 

Tours faithfully, 

J. w. Power 



Kr Power, 

Vhen Tandy first made the CoCo 
3, they decided that It would be 
conpatible with the CoCo 1 and 
2, ie everything then ran on the 
CoCo 1 and 2 would also run. on 
the CoCo 3. 

Since the introduction of the 
CoCo 1 in the early 1980*6, the 
CoCo was only supposed to go up 
tg 16k with. 32k belnp only 
dreamed about. 

Technically, the CoCo cauld 
have easily accessed 32k, It's 
just that they didn't believe 
that a home computer needed that 
much memory! 

Overall, 32k is all the CoCo 1 
could be able to access. 64k can 
be utilized fully by either (a> 
using another language, ej; OS-9, 
Flex, etc, or (b) by running 
your ROM under a HAH system (ie, 
notifiable ROM, in a sense.) 

In short, the CoCo can only 

access 32k of true user RAX, 
suitable for Basic programs. 
(Haturally there has been a 
progran written that can access 
40k of memory, but that's only 
for the CoCa 1, and also another 
storyl > 
Vhat I aa leading up to i6 

that since the CoCo 3 ie 
supposed to maintain 

compatibility with the CoCo 1 
and 2, it cab only access 32k or 
user RAK under Basic. It 16 only 
under languages other than Basic 
(like the above mentioned 

languages, OS-9, Flex, etc) can 
the real 512k of the CoCo 3 be 
accessed. 

To answer your question; no, 

there is no way to overcome 
this. 

About your program - yes, we 

certainly do have use for it. 
Please follow the instructions 
titled "Submitting Vour Vork" 

Ve Rladly accept such software 
as there are many such DaD <and 
ADaD) groups about, and with 
6uch a progran, It could 
certainly make a dungeon masters 
day . . . 1 



Dear Dr CoCo, 

I'm into electronics, bo if 
you want my comments or 
suggestions for your magazine, 

feel free to ask. 

I like the two magazines. I 
hope they al60 include a 
vocabulary or computer jargon 
and computer theory! Bit by bit! 
You know what I mean. (In short, 
X missed all of these!) 

About my programming, well 
still on B&6ic, but doing fine. 
It is useful on a course I'm 

doing. I'll try some other 
languages later. Can you tell me 
the difference between assembly 
language and machine language? 
They seem tne some to me. 

Yours sincerely, 

Mr Hola6co 

Gladstoae. OLD 

Mr Folasco, 

Tour comments and suggestions 

are greatly welcomed by this 

magazine. Thank you. All 

computer theory and Jargon 
appear In our other magazine, 
CoCo, at the beginning of each 
year (meaning in the January 
edition of CoCo). 



Yes, you are (in theory) right 
about your statement, re 

Assembly and Xachlne language. 

The story with assembly 
language is that assembly le a 
language to be used as an aid 
for the user to write his 
program before the computer 
turns it into machine language. 

It's like this: you're a user. 
You write programs in Basic, and 
when you tell the computer to 
RUH the program, It then turns 
each individual line into 

machine language using an 
interpreter. The Basic code, In 
effect, Is turned into machine 
Language . 

the same exists with assembly. 
You write the program, assemble 
It (like RUBning it, only that 
you take the part of the 
Interpreter without knowing it>, 
EXEC it (a for sb of a RU5 
command) and the results are 
about the same. 

I hope that clears that myth 

Vlp. 



Jfolneto $t|>. Xtti. 

Authorised dietributor of Amtron Australia Products. 



*Flat Ribbon Cable and Connectors 

*D Sub Connectors 

♦Full Range of Amphenol Connectors 

*Cable Assemblies 

*Circular Connectors 

*IC Sockets and Headers 

*Edge Connectors 

*Custom Cables 

♦Military Connectors 

*RF connectors 

♦Racking Systems 



- NEXT DAY SHIPPING 

- WHOLESALE PRICES 

- DEALER ENQUIRIES WELCOME 

PHONE (02) 689 3327 
FAX; (02) 891 2349 SUITE 2, LEVEL 2 

PO BOX 1110, 93 PHILLIP STREET, 

PARRAMATTA, N.S.W. 2150 PARRAMATTA, N.S.W. 2150 
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SUBMITTING 
YOUR WORK 



Ah! So you've finally finished that 
program? And you say to yourself, "Vhat 
a great program that would sake for CoCo 
Kagozlne/Sof tgold Magazine! H 

And so you wonder to yourself, "How am 
I going to send thi6 program in to the 
magazine?". Some time goes by and you 
suddenly realise, "Hey, there's an 
article in this month's magazine about 
submitting your work. I'll read through 
that and maybe that'll help me." 

So you rip the magazine oat of your 
stack of other CoCo/Softgold magazines 
and read the article on how to submit 
your program. 

1 1 reads . . . 

" ... we accept prograns stored on 
both tape and disk OMLY along with a 
hard copy of the programCs) (optional 
only; we use it here as a reference to 
see what the progran is/does) and 
suitable instructions. 

Saving to Tape 

Each program wouLd be best saved three 
times with the last save being in ASCII. 
The tapes we recommend you use are 
eltliei a C30 oj Ubs (the reason foi 

that le that tapes longer than C30 have 
a tendency to tear). 

It'd be even better If you could 
include some instructions along with the 
program, either as a separate program or 
in the wordprocessors listed below. 

Saving to Disk 

With disk, you'd be best to save it 
three times with the last save being in 
ASCII. Also, the extension name for the 
second and third copy should be 
different, so to distinguish the three 
copies. A simulation is given below. 

' ... I have just saved 3 copies of a 
program called "HORSB". The directory 

listing; would be: 

HORSE BAS B 3 
HORSE 1 B 3 
HORSE 2 A 3' 



Any Instructions cauld be saved In the 
same system using either a program or in 
the wordproceesore listed below. 



Vordprocessors we 'jse. 

Here is a 1 1st from our most 
preferable wor processors to the drastic 
measure one could take to tell us how 
your program works. 

1. Telewriter/Telepatch 

2. Scripslt 

3. PenPal 

4. VIP Vrlter 

5. Any lorn of data file. 

6. Instructions written in a separata 
program. " 



"Oh wow!", you think to yourself as 
you read It with awe and astonishment. 
So you go about your busy little way 
emving your progran and instructions to 
tape or disk. Then you say to yourself, 
"Vbere do I send it?" 

You read the or ticle on . . . 

"... any articles and programs should 
he sent to this address: 



Submissions Editor, 
Freepost 5 
PO Box 1742, 
Southport, Old, 4215 



All mall to this address need not be 
paid for. 

All tapes and disks received will bo 
returned after three months In case we 
need to refer to something or re-print 
something.** 



So place your tapc/diek along with 

your hardcopy of the listing In a 
postpack Cor suitable wrapping) and pop 
it Id the mall. 
All done! I 



BLAXLAND COMPUTER 
SERVICES PTY. LTD. 

SERVICING MODERN TECHNOLOGY 




ELECTRONIC 



DIALER 



NO 9254 



•tconf. 



CC3 - S120Q.00 
CC3 - $160.00 
CC3 - S99.95 
CC3 - ?».S5 
CC3 - $39.95 
CC3 - $99.95 
CC3 - «L.9S 
CC3 - S69.95 
CC3 - $69-. 95 
CC3 - SS9.95 
CC2 - $59. 9S 
CC2 - P.O. A, 
CC2 - P.O. A. 
CC2 - P.O. A. 
CC2 - P.O.A, 
CC2 - $59.95 
0C2 - $32.00 
CC2 - $56.00 
CC2 - $44.00 
CC2 - 55*. 00 
CC2 - S4Q.0O 
CC2 - $40.00 
CC2 - $76.0(3 



«•.••••»••••••*•••*••»•••••••••«•••••••••••■••••"■""•"**•""■"*""""" 

OS-9 LEVEL 2 - includes Basic 0) (Direct lie* U.S.I CC3 - $180.00 

DESkjiaTe 3 - For your Coco 2 CC3 " J; ;*- 

I .U.S.- 4th Generation Language Database (Smile User) CC2/3 - , - . ■ 
SCULPTOR - *GL Database Multiuser (OS-9 level 2 req.) 
THS WI2 - Comaum cat ions with Windows (L2 fc RS232 req. 
SCTEEH STAR - OS-9 Screen Editor with smart Sraeller 
SCREEN STAR TEXT fxirmATTFR - u«* with Screen Star 

KAMDISK W 512K DIAGNOSTIC - plus utilities 
COLOR SCRIBE - RS/DOS wocdprocessor 
THE WILD WtA'l - Dy Tom Mix (DisA> 

NUKE THE LOVE BOAT - Adventure using 512K as randisX 
•HAGIC OF 2ANTH - Ariventuce "itd top graphics 
RETURN OF JUNIOR'S RFVENCE - Ml tine favourite 
PRO GOLF - 36 Holes, 32K required (Oiskl 
MR. DtC - Tape ot OisK 

ESCAPE: 2012 - 64K Adventure (.137 rooms) 
T7EA5UR1" Of THE AZTECS - 4 voice iwjsic, 50 hires 
ROBOT ODYSSEY - 64K Adventure (Disk) 
COMPLETE RAINBOW GUIDE TO OS-9 - 2 Disks, no book 
FIRST RAINBOW BOCK Cf AJJVTNTURES - Book and Tape 
SECOND RAINBOW BOOK OF ADVENTUBES - Book and Tape 
THIRD RASNBCW BCOX OF ADVENTURES - Book aid Tape 
• • • ■ Book .aid Dink 

RAINBOW BOOK OF SIMULATIONS - Book and Tape 
SECOND RAINBOW WK OF SIMULATIONS - Book and Tape 
irfTPODUCTORY GUIDE TO STATISTICS - Book and Tape OC Disk v-- 
D:SK TUTORIAL - for serious disk basic/ml proq. (2 -SisK,CC2/3 - S'*-™ 

COCO CPAPHICS DESIGNER - print your cards, 9iqns*bonnersCC2/3 - $59. 95 
- 100 pre-drawn pictures CC2/3 - $29.95 

3D-GRAPHIMATOR - 3 Dimensional Drawing Design CC2 - P.O.A. 

PROGRAMMERS UTILITY - ComMnds 6 Utilities by keystroke Cv - 
PRLNTMASTEfl 
AST GALLERY 1 
AST GALLERY 2 

KBH5KKM 

C_tP APT 1 

CLIP ART 2 

CLIP ART 3 

NEWSMASTER (DESKTOP PUBLISHING) 

PRODESIGN (CAD SYSTEM WITH HI-RES PRINTOUTS) 

CUPPER (DBASE III COMPILER] 

DAC-EAS* ACCOUNTIMG AUSTRALIA* VERSION 

CAC-EASY *ORD PROCESSOR 

FBS ACCOUNTING SUITF ( inventory.Debtors^Cfeditors.G/Lt 

FBS PAYROLL 

FBS BILL Of MATERIALS 

FBS JOB COSTING 

M TYPIST rf)RD PROCESSOR 

PEEKS M" POKES FC« IBM 

INSIDE TRACK FOR IBM 

SPEEDIT PROGPAM EDITOR 

PROKEY 

HUSICA II DISK OR TAPE 

KUSICA I.IBRARY 100/800 EACH HCT 

GEOGRAPHY (Af r lca.Sout" America, Asia, Europe, o. s.A.l 

BOUNCING BOULDERS 



GAUNTLET 

KARATF 

fNCCKOUT 

P-16 MISSION* ASSAULT 

SHOCK TROOPER 

PAPER CHASE 

V.H6LE WAZC 

DECATHLON 

(ITNEYPOLY 

SAILOR KAN 

COCOTEX VIATEL SOFTWARE 

9US1NKSS accoumtii-c system 

FAMILY TtEE GENFOLOGY 
SUPER BACKUP UTILITY 
rFLEWRITER 64 DlSf * TAPE 
VJP-WRITER DISK ♦ TAPE 
VIP-DATABACf DISK ONLY 
VIP-CALC UIS* » TAPE 

viP-spFu.np mr.K oily 

VIt-Tl*MI«AL OIRK » TAME 



IBM - $96.35 
IBM - $56.65 
IBM - S56.65 
IBH - $101.95 
IB4 - 550.95 
14M - $62.35 
IBM - $62.35 
IBM - S170.00 
IBM - S630.00 
IBM - $599.00 
IBM - S250.00 
IBM - $129.00 
IBM - $830.00 
IBM - $630.00 
IBH - 5630.00 
IBM - $630.00 
IPM - 5159.00 
IBM - $66.00 
IBM - C0.5.UU 
IBM - S79.00 
UN - 5195.00 
CC2 - $49.00 
CC2 - $49.00 
CC2 - $99.95 
CC;/3 - $49.95 
CCi/3 - $49.95 
CCi/3 - $49.95 
CC:/3 - $49.95 
CCl/2 - $49.95 
CC2 - S31.45 
CC2/3 - $49.95 
OT?/l - S49.95 
CC2 - $33.45 
CC2 - $33.45 
CC2 - $33.45 
CCc/3 - $99.95 
CC2 - $99.95 
CC2 - $33.45 
0C2 - 5*59.95 
CC2 - $84. <5 
CC2 - $98.95 
X2 - $04.45 
CC2 - $S4.45 
CC2 - $77.45 
CC2 - $94.45 



BCOKS-0O0KS-B00KS-I30W^ 



AMERICAN RAINKW - Direct fron USA, month ot publication 
BACK ISSUE ORCUtS - place your order in July and August 
P.C.H. - Portable Computer Monthly, month cf publication 
INSIDE OS-9 LEVEL II - A IBiSt for Level II 

501) PFEKS and POKES - for your Coco 

200 ADDITIONAL PEEKS and POKES - supplement to 500 
ASSEMBLY LANGUAGE PROGRAMMING - by Barden 
COMPLETE RAINBOW GUIDE TO OS-9 
NANOS REFERENCE CARD POP COCO 

fiftM ASSEMBLY lanojage frootamhing 
visicalc appl:catiws 
multiplan applications 
uhderctx'jdirc'computer science 
dbase 111 tips and> traps 
graphics primer fqft your ibm pc 

YOUR ie« MADE EASY 

PC SECRETS 

PC DOS TIPS S TRAPS 

YOUR IBM PC 

GUIDE TO USING LOTUS 1-2-3 

C LIBRARY 

USING DBASE HI 

THF B0B6 BCOH 

THE SHAREWARE BOOK 

MflASIC HAHDBOOI 



-OCOKS-DCOKS 
ttMHMINI 
P.O.A. 
P.O.A. 
P.O.A. 
S79.00 
5J3.95 
$19.95 
SL1.95 
S39.95 
S5.95 
$41.95 
$19.95 
$19.95 
S5.49 
$37.95 
$45.95 
$31.99 
$35.95 
$35.95 
$39.95 
$36.95 
536.95 
$37.95 
$39.95 
$31.93 
J39.95 



-HAHWAREHlARDWAPF-HARXWASE-HARrWARE-HJPrMAPr-HARDWARE 



lOMECABYTE HARD 0ISK DRIVE - Speed and Mass Storage CC2/3 - 
20MEGABYTE HARD DISK DRIVE - Large Businec; Storage CC2/3 - 

SI2k COCO 3 UPGRADE Includes P.D Software CC3 

TEAC DSDD DftlvT 40T PLUS CCVTROLLI'R - Double lieiqht CC2/3 

TEAC»2 DSDD DRIVES 40T PLUS OJWTP . - Equal to 4 Tandy. CC2/3 

BARE TEAC DSDD 40T DRIVES - Hi-tech reliability CC2/3 

BARE TEAC DSCD BOT DRIVES - 1.4MB Storaqe per drive CC2/3 

BARE TANDY SfOO DRIVES - not $519 (wbiect to stock! 

T1UUU Mna IWtKNAL HV ' 1 year «Mtt«ity, (or««tt«d 

T1000 CXMBI RS232/640K/CLOCM/CALESDAR 

TMOMSW AMBER/GREEN COMPOSITE «HITORS WITH SOUND 

TANDY 1000 SJ - 384K, 2 DRIVE 

TANDY 1000 EX 

TANDY COLOUR COMPUTER 3 - 126K 

TANDY 102 POBTABLE 

TANDY 200 PORTABLE. 

MULTIPAK INTERFACE - SWITCHABLE COCO 2/3, I£D OMAJFF 

VIDEO DRIVER WITH SOUND 

video driver WITHOUT sc*WD (if your *oflitor has sound 

MODIFIED ARCHER JOYSTICKS - SUIT COCO 2/3 
CITIZEN J20D DOT MATRIX PRINTER - EXTRA TYPEPONTS 
DHP-ID6 DOT HATRIX PPI^TER 
DMP-130 DOT RATRIX PRINTER 

AVTEK MINI modem • 300 k 1200/75 baud, econofry plus 

TANDY INTERNAL MOoEM - 300 6 120(1/75 * VTEX2 software 

SUPER AUiO i«OEM - 300,1200/75,1200 auto £ns./dlal/con .T100O 

rfrSE 30 TERMtWALS CC3 



T100O 
T100O 
ALL 
T100O - 
T1000 - 

cca 

T102 
T200 - 
CC2/3 
CC2 
I CC2 

CC2/3 
ALL 
ALL 
ALL 
ALL 
T1Q0O 



$1299.00 
$1599.00 

■ $220.00 

■ S6B0.00 

■ 5950.00 
• S 300. 00 

- $3^0.00 

- $250.00 
£13-99.00 

- $750.00 

- $350.00 
S19-99.00 
51299.00 

- $449.00 

- $999.00 
S1399.00 

- $199.95 

- $38.00 

- $32. 0u 

- S-27.00 

- SS99.00 

- $399.00 

- Sb99.00 

- $250,00 

- SS99.00 

- $820.00 

- $999.00 



-MI SCELIA^EC^-MI SCELLMTCC4JS-NISCXLt>J!E 



PRirnTR PAFEU 9-1/16" x 11" PLAIN per 1000 sheets 

PRINTER PAPER * K " PLArN per DOX 4000 sheets 

PRINTER PAPER 9-1/2" x 11" PLAIN per 1000 sheets clean edao 

PRINTER PAPC^ 9-1/2" x 11-2/3* PLAIN A4 per 1000 sheets 

HPir/rER PAPE' 11" X 15." PLAIN pec 1000) 

PRirnER PAPE* 11" X 15" [SLUE RULE per ,-ttfi (also SCREEN) 

NCR 2 PART 9-1/2" I U" |M carbon requirod) per 1000 

MAILIMT, LABELS llrm x SOmP (4 up) per 1000 

"WIL1NC LARELS 23ito x B9mm (I up) per 100) 

MAILING LABELS 36flff x 102wi II up) pef 1030 

CASSETTE lABEl^ <orange1 pe-rlOO (10 r*t 9neet)55.00 (whitel 

BLANK CASSETTES C-10's (10 min. ) $1.10 each. C-!0's 

STORAGE CASE, HIWH ' . ( l '*/'l,i: 5-1/4" hOlfe »00 S25: hiildn CO 

STORAGE CASE, HINCKD 3-1/2" holds 60 

j-i/2" isdd oisKrms box iu 

5-1/4* DSnD DISKETrES box 10 

DISK HEAD OFAfJING KIT 3-1/2" 

DISK HEAD CUP AN I NG KJT 5-1/4" 

LARGE RANGE PRINTER RIBIV)N/CAKTRlDt;iS> framty/non Tandy) 

LARGE RA;«;r: PRf;-pRI^TEf) INVOICE/ STnTEKKNI FtHflS AVA11ABLE 



S17.0U 
S60.00 
^25. no 
S29.0O 
S30.00 

S74.0Q 

56.00 

S16.0O 

■31B.0O 

S4.00 

$1.3" 

SZ7.ua 

$15.00 
$55.00 
$25.00 
$11.95 
HI. 95 
i'.O.A. 
P.O.A. 




BLAXLAND COMPUTER 
SERVICES PTY. LTD. 

134 GREAT WESTERN HIGHWAY, 
BLAXLAND 2774 N.S.W. 

P.O.BOX 125 
PHOfiE: (047) 39 3903 



PRICES SUBJECT TO CHANCE 
WITHOUT NOTICE. 

POSTAGE AND PACKAGING 
EXTRA 
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PMS MOIO ELECTRONICS 



161 Bumerong Rd .Kingsf ord 2032 NSW 
Phone 02 344 9111BBS 02 3449511 
Viatel * 64268# 




New Products for your CoCo 1,2 & 3 



AVTEK VIATEL PACK 

Includes the following; 

* Avtek Mini- Mod em 11 

* RS-232 Cable 

* CoCo Tex Viatel Software 
SALE PRICE $279.95 



AVTEK MEGA- MODEM 
Smart Mod sm.Compattole 300/300. 
1200/75 Auto Dial and Auto 
Answer. 

PRICE AS ABOVE i... $499.95 

PRICE WITH 1200/1200. ..$699.95 



INSIDE OS-9 LEVEL 2 

The inside story behind OS-9. 
L11 on the CoCo 111 written by 
Frank Hogg and Kevin Darling 
PRICE $54.95 



512 K Upgrade kits 

PJB inc 512K upgrade for your 
CoCo 111. Easy installation.No Wring 
Ram disc driver and utilities 
supplied .A must for OS-9 L2 
SALE PRICE $180. 



OS-9 LEVEL 11 
Operating System for CoCo 111 
now in stock. Includes Basic 09 
SALE PRICE $18 

WIZ COMMUNICATIONS PAK 
New from Frank Hogg Labs. 
Uses windowing of OS-9 L11. 
Packed with features. 
PRICE $129.9 5 

SCULPTOR DATA BASE 
4th. Generation language 
+ data base manager 
PRICE $995 



laagJ^BBMBB 

PRODUCED WTH DESKTOP PUBLISHING; AND AN AT API ST SYSTEM 



See our stand at Conf '87! 
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Editor Jim Rogers 

DIGITIZ 



MO 10 by Frank Rees 

Computet epeakiQR le o fun 
thing. DIGITIZ contains 
all the essential elements 
to record and play digitized 
sound. The play driver also has 

other sound applications* I 

have made it self -locating in 
memory, SO memory size used or 
other utility programs Clike ny 
printer driver) won't r.Atme iny 

relocation problen. 

The program is, In every way, 
self-explanatory. Only the 

hook-up may need some 

explaining. After the program 

is typed In and copies saved to 
tape by running line 906, 
disconnect the lead from the 
computer to the NIC on the 
recorder. Put the recorder In 
'record' node (with or without a 
tope) and RUS the program. 
Select <S>peed - (H)l-fi or 
(B)xtended play - and when 
ready, select (R)ecard aad start 
talking. Vhen the time le up, 
you get an instant replay. 

If you have a cassette 
recorder without a built-in 
microphone, e.g. R/S CCR-82, you 
should plug an appropriate Klc 
into the recorder, or make a 
tape of what you want to 
digitize and PLAT it at the 
appropriate tine. 



It is a constant source of 
arguement - and delight - to 
me, when I realize the nuiber 
of tasks that- can be carried out 
on the KC-10. 

Vith the advent of "Little e" 

by H. Allen-Curtis, we then 
passed on to such programs as 
Mike Turk's "Super Text 
Processor", Bob Schectcr's 

"KcVord", Grahane Pollock's "Rom 
1.3" and Telewriter programs 
etc. etc. 

The list Is too long to 
complete but. there were many, 
many more- Sow Frank Rees has 
come up with "Dlgitiz" which he 
had published In the IKS X.C.O.G. 
newsletter, some time ago. 

This will allow the operator 
to record speech, which can then 
be played, via the KC-10, 
through the monitor. It nakes 
the computer talk! 



Ve saw a sample of thio in an 
earlier version last year at 
CoCo Conf. 

Ve now have the listing plus 
instructions from Prank for 
publ Ication. 

By the way. Frank tells me 
that he has Siemens Teleprinter 
for sale, ready to go as a 
computer printer for CoCo, MC-10 
and many other types. The price 
is S85 complete with guarrentee 
and paper caa be supplied from] 
$5 to $10 a roll. 

If any readers should wish for 
a reprint of any of the old 
programs, let us know for 
inclusion in a future issue. 




<H)l-fi should give you about 
10 seconds of digitized speech, 
and the (E )x tended play about 20 
(depending on available memory. ) 

Re<P>lay the digitized speech 
as often as you like. If you 
wish to make an audio tape of 

It, plug the computer back into 
the MIC on the recorder, Insert 
a blank tape and Bet the 
recorder lu 'recuid' mtKle. 

Re<P>lay the sound (output is to 
both the TV and Cassette 
Output.) 

If you are interested in a 

step-by-step explanation of the 

record/play machine language 
program, write to: 



Franlt Ht*e& 
27 King St. 
Boort Vic, 



3537 



166 REM rafcX%%9S!!J£9£9!3E%StS&9t2&9g , Hfe9tS£ 

1 10 REH VX 

"4% 
128 REM R& - D I G 1 

T I Z - %% 

136 REM *»S 

'S.Y m 

H8 REM XWMXVCC&XfMtyX'tf.'tXVX 

150 REH' 

209 REMARKS * + ♦ MORNING SAVE BEF 

ORE RUN +♦♦ 

216 REM' 

220 IF PEEK(252X>eGOT0258 

230 SP- PEEKU61 >*£56*PEEK< 162 >- 

71 

2*0 CLERRI00,SP 

250 CLS'PRlNTgZOtt, "LUHDIN& DPTH" 

260 SP = PEEK< 161 »256*PEEK< U2)« 

1 'SR- SP+38 

278 FOR LQG« SP TO SP+69 ■ REfl> I? 

Ft* 

260 MH»-LEFT*<DH*. 1 >• LI|f=RlGHT$ 

<r>n*. i ) 

290 HH= fiSC(MN#>< MH=> MN-48> IF 
HH>S THEN HH-M-> 



300 LIU RSCCUt*)' LH= LM-48' IF 

LH>9 THEN LM-LN-7 

31© Oft* M1U16+LN POKE LOCDA' P 

RlHT6213,DRt' HEXT L0C 

326 START* PEEK< 153 >*256+PEEK< 15 

4) 

330 FIHIS=PEEK< 155>*256+PEEK< 156 

J-100 

34& H- START' COSUB780' POKE252, 

HE&' PCIKE253.LSB 

350 11= FINIS. GOSUB780' FOKE254. 

MSB< P0KE255.LSB 

'*£& CL§ 

370 PRIHTe260, "EXTENDED PLAY <E> 

389 PRIIITS196. "HI-FI (H) 

390 PRINT6338, "YOUR CHOICE ?" 
109 AHMIHKEY*' IF RHS«" "GOTO480 
410 PS=4' IF nH*="E" THEN PS-20 
42& POKE SPtl7.PS' POKESP+54-PS 
430 CLS 

440 PRINTS 132. "RECORD CR)" 

450 PRINT* 196, "PLftY <P>" 

460 PR1NT&268, "SPEED <S>" 

476 PR1NTG338, "YOUR CHOICE ?* 
480 Allt-INKEYSMF AN*- ""G0T0488 

499 IF AII* = "RMHEH CLS - PR INTG209 
. "RECORDING" EXEC SR 

500 IF AH$-"S" GOTO360 

516 CLS-PRlNTei9e- "cowfuter »Pft« 

kiT.9" 'EXEC SP'GOTu 430 

700 HSP=IHT<N/256>> LSB=N-256*MS 

B> RETURN 

980 REM = 

901 DATA DE,FC.CG»88,Pi6.00.37.97 
,03,1€.C4.C8,F7,BF,FF,49,C6 

902 DATA 04. 5ft, 26, FD, 33,50. 26, ED 
.68,5*C>FE* 26iE4.7F,BF.FF.0D. 79 

903 DATA 08.e3,39-DE-FC,4F.C6/08 
.37,D6,03-0C-C5.10'27/01,0D,49 
984 DATA C6.64.5A.26. FD, 33, 5FI, 26 
,EE>,ee,A7,0O,9C,FE,26,E3.39 

905 RE11 

906 FDR X ■nO3'SOUND3e.30'CSAVE 
"DIGIT 12- NEXTX 

907 REH' 

910 REH &%%MMM t 4%¥4'4'tflW. m 4WCi% 

926 REH y/4 

y.>. 

93© REM '< FRANK REES 27 KING ST. 
BOORT 3537 VICTORIA AUSTRALIA * 
94 REM Hfc 

950 rem s&is&fs&s&GS&SssgKftse&XKXS&s&ss 
>MVMWa '.:''. >. w* k '< v. ». >. vxa >. sc '< '< >.>.'<>. >.>.>. Hg 
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AKIMATE SHQV3 T 
the FALETTE c 
proRram stows 
spinning on a scr 
background and an 
trajectory" leading 
planets 

The program takes 
draw before the 
starts. 

The program techn 
developed by Simon Ai 
a BBC, 



HE power of 

oamand. The 

4 planets 

olllng-star 

"approach 

into a 

a while to 
animation 

Iques were 
as worth on 



The Listing: 

GOT040 

1 'AKIMATION 

2 'BY CRAIG STEVART 

3 SAVE» , 257;3":END , 6 

4 SAVE"3ANIKATE:1 

5 END 

40 POKE 65497, OrOHBRK G0TO630 

SO HSCREEN2: PALETTE1, 36: PALETTE2 

, 15: PALETTE3.54: PALETTE6, 36 

70 HCLS0:HCOLORl:PI=3. 1415926:X= 

40:Y=33:R=25;Tl=PI'6;<}OStfB140 

80 X=2fiO:Y=30:R=28:TI=5*PI/4:GOS 

UB 140 

90 X=150;Y=10e:R=70:TI=-7*PI/6;G 

OSUB 140 

100 X=1:Y=190:R=13D:TI=0:GOSUB 1 

40 

110 GOSUB 34G:G0SUB 510 

120 HCOLOR]:HPRINT(12,0),"COCO-3 
AN I HAT I OH" 
130 GOTO 590 
140 ' PLANET DRAV 
150 HCIRCLE(X > Y),K*2 1 lrHPAtBTCX, 
YM,1:HCIRCLE<X,Y),R+2,2:HPAINT 
<X,Y>,2,2 

160 C0-3:F0R PH=0T33. 1 STEP.liHC 
OLORCO 

170 H=R*COS<PH>:V=R;D=0:AL=PI/2* 

Tl: BE=PI/2; GOSUB 240 

180 C0=C0+1:IF CO=3THEN CO=3 

190 NEXTPH:HCOL0Rl 

20O FOF TH>.5T0 2.5 STEP2.5 

210 H=-R/4*SIN(TH):V=R*SIN(TH):D 

F=R*C0S ( TH > : AL=T I ; BE= 1 . 5 

220 COSUB240:NEXT 

230 HCOLORO:HLINEO,0>-<319,191> 

.PSET.B: RETURN 

240 S=SIN(AL>:C=COS(AL):X3=X: Y3= 

Y:X1=X: Y1 = Y 

250 X-V*SI N (BE> ; YO+H+C0S<BE> ; X2 

=CtX+S*Y: Y2=CtY-S*X 

260 IFY1 + Y2H91 THSN Y2=191-Y1 
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270 HLIBE<Xi+X2,Yl+Y2>-<Xl+X2,Yi 

+Y2>,PSET:FOR GA=-BE TC BE+.l ST 

Er.25 

280 Y=D+H*COS(GA):X=>Vt£iNCGA>:X4 

=C*X+S*Y+Xl:Y4=C*Y-S*Xm 

290 IFY4H91 THEN Y4=L91 

300 IF X4<0 THEN X4=0 

310 HLIBE-(X4,Y4),PSET 

320 NEXT:X=X3:Y=Y3:RETIRN 

330 NEXT: X=X3:Y=Y3: RETURN 

340 ' APPROACH PATH 

350 X=295:Y=168;R=25 

360 C0=9 

370 FORT1=OT01.2STEP.05 

380 HCOLORCO:GOSUE430 

390 X=.9*X+19:Y=.8*Y+10:R=R*.92 

400 C0=CO+t:IF C0=15 THES C0=9 

410 NEXT 

420 RETURN 

430 X1=X:Y1=Y 

440 S=SIK(TI>;C=COS(Tl: 

450 X2=R* <C+S) +X1 : Y2 = R* CC-S> + Yl J 

X3=R* (C-S) +X1 1 Y3=R* <-C-S> +Y1 : X4= 

R*<-C-S>+X1:Y4=R*CS-C>-Y1:X5=R*C 

S-O+Xl : Y5=R* (OS) +Y1 : X6-E* (C+S) 

tXi:Y6-S*(C-S)tYl 

46!) HLLNE(X2,Y2)-CX3,Y3) 1 PSET:HL 

INECX2+1,Y2+1>-(X3+1,Y3+1),PSET 
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470 HLINE(X3,Y3)-(X4,Y4>,PSETrHL 
INE(X3U,Y3 + l)-(X4»l,Y4tl),PSET 
430 HLINE<X4,Y4>-<X5,Y5>,PSET:HL 
I HE CX4 * 1 , Y4 + 1 ) - <X5+ 1 , Y5 + 1 ) , PSET 
490 HLINE(X5,Y5)-(X6 I Y6) I PSET:HL 
lKEa5*l,Y5+l>-tXe+l,W+l>,PSET 
500 RETURN 

510 X=ESD(-TIIIER):FOR I = OT030 
520 X=319:Y=3.6*I+5:X1=-3*C.8*RH 
D(0)*.S):CO=RND<6H8:Yl=(-.5+RND 
(0))/4 

530 C0=C0+1:IF C0=15 THEN C0=9 
540 IF Y<0 THEN Y=0 
550 P=HPOINT<X,Y):IF P=0 THEN HS 
ET(X,Y,CO):HSET(X+l,Y t CO> 
560 X=X+X1:Y=Y+Y1:IF X>2 THEN 53 


570 NEXT: RETURN 
580 ' ANIMATE SCENE 
590 FOE I=0TO 15.PALETTE 1,0: BEX 
T:PALETTE 1 ,63: PALETTES, 15 
600 FOE 1=3 T08:J=I-1: I FJ =2 THEN 
J=8 

610 PALETTEJ, 15: PALETTE I, 63; PAL 
ETTEJ+6,0:PALErTEI+6,54 
620 NEXT;CQTG5QQ 
630 PALETTE CMP: END 

o 



ARTIFICIAL INTELLIGENCE 

CONCEPTS, THEORY, and TECHNOLOGY 



by Mark E. Perlmuter 

Id the past year and a half 
there has been a significant 
Increase in high level 

programming languages. 

Artificial Intelligence (AD 
seems to be the most written 
about "new" language. 

It is supposed to be natural, 
and should include a friendly 
human-computer interface. 

Besides being very current, 
the ambiguities and coafusion 
surrounding AI (Artificial 

Intelligence) should be 

explained. 

There Is a need for a nigh 
level programming language that 
can be easily used and 
transported between computerized 

systems. 

Vith more and more time spent 
in software development, an 
easier more flexible language Is 
the need of many programmers and 
consultants. 

The approach of simply 

describing "what" a problem is 
with facte and rules instead of 
telling the computer "how" to 
solve a problem can allow the 
uiuyinimner to reduce 'the tiraft 

needed for writing »any 
applications. This is one of the 
fundamental concepts concerning 
AI. 

There Is a need for fewer and 
f«ver "bugs" in off the shelf 
programs. This is truer now 
than ever due to the wide spread 
usage of microcomputers and 
users in general. These are 
some of the reasons that could 
be cited for the need of a 
solid, reliable, and industry 
standard for artificial 

languages. 

THE HATURE OF PSOBLBK 
SOLVIHG ARD DECIS10H 
KAKIBG 



For Humans, the structure of 
thought and creativity is 

frequently misunderstood with 
amazingly incorrect 



preconceptions. This area of 
research i6 so vast, yet 
immature, that a small 

Introduction via an outline 
format is the most appropriate 

at present. 

Computers will be presented 
in a similar format for 
comparison. 

1. Problem solving and 

decisions, . ..Human Orientation. 



Relevant 
factors; 



and 



related 



as 



A. Culture 
sociological concept. 

This involves how the 
societal environment affects the 

individual. 

Related factors Include the 

(conscious and unconscious) 

rules, attitudes, interactive 
persona 1 1 ty structure , 

traditions, myths, history, 

perceptual attitudes in 

architecture, language, 

geography, and other aspects. 

B. Home environment 

involving family structure and 

routs. 

The localised prnr.esees focuc 
on parents, siblings, economics, 
types and level of nurturing, 
creation-foundation of self 

image, interaction with 

outsiders, and other factors. 



C. Genetic coding can 

possibly affect temperament, 
behavior, thought processing, 
creativity, response tendencies, 
physical health-structure, and 
other unknown variables, 



D. There are also numerous 
unknown influences affecting 
one's orientation. Included in 

this category are drugs, 

religious beliefs, natural 

disasters, glandular and love 
reactions, mass media, disease 
and/or ill health, radiation, 
other dimensions, and other 
unknowns, including possibly 
psychic Influences. 



B. All of the above relate 
to personal reality constructs 
which affect creativity, 

intelligence, knowledge. 

decisions, and the poorly 
defined word. . . . wisdom. 



P. Intelligence ie> the 

Integration of knowledge to 
create new Ideas and concepts. 
Vlsdom is the self examination 
and conscious integration of 

feelings, ideas, needs, desires, 
and attitudes, with creative 
experimentation in living. The 
above is just a short 
esrp la nation. Good programming 
only needs intelligence. 



2. Problem solving and 

decisions. . . . the Computer 

Interface. 



Relevant and related factors. 

A. The nature of programmers 
and how they construct their 

programs affects computer 

reliability in various 

processes. 



B. There are special 

restrictions and capabilities in 
the architecture of various 
computers. This affects the 
1/0, operating systems, and how 
readily bugs will appear. 

Programmers must deal with a 
multitude of capabilities and 
rcetr let tone. 



G. Computer operators, 

industries, and the businesses 
using computer hardware-software 
create a feedback affecting 
computer development. The 

computer literacy, mental 

blocks, background of the users, 
their needs, reality constructs 
(in both the business and 
scientific realms), fears, 

environmental and lifestyle 
impositions are factors In 
applications and languages 

created for their use and needs. 
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1KB HISTORY AID 
BASIS OF ARTIFICIAL 

JSTHLLIGEICE 

Prolog stands for 

"Programing in Logic". 

Lisp is short for "List 
Processing". 

Clockain & Kelllsh is the 
standard (supposedly) for 

Prolog. The first official 
version of Prolog was developed 
at the University of Marseilles, 

France by Alain Colnerauer. 
John McCarthy of MIT in 1956 
devo loped Lisp. Conaoa Lisp 
(recognized by the U.S. 
Strategic Computing Initiative) 
is considered the lisp standard. 

In 1963 Japan published plans 
for fifth generation computers 
far which Prolog was the basis 
of the programing environment. 

There are more so-called 
standards for ai by various 
groups and countries. The two 
main languages that are 
considered by software Bakers to 
be the standard for A 2 are LISP 
and PROLOG. Some Lisp progress 
claim that they can be developed 
into prolog programs- 

There is another Language 
used In AI. It is naned 
Smalltalk. There is a snail 
public domain version of it, if 

you Just want to experiment. 

There le an official version 
of it naned Sralltalk/V produced 
by Dlgltalk Inc. . a company froa 
California. 

The basis of AI concepts 

began with the 1940 paper by 
Alan X. Turing called 

"Intelligence Machinery". 

As one can see by this brief 
overview AI is ambiguous and 
diverse even from It' 6 

beginnings, let alone the 

present. 

Prolog starts in a very 
elapla format, but it does a 
leap to a flexible yet 
structured language with the) 
need of specific patterns In the 
programming structure and 

syntax. There are certain 

versions that allow new 
algorithms to be developed and 
encased in a properly developed 
Prolog program. 

Even computer operators would 
be able to make changes in the 
program for handling various new 
functions in the software. This 
Is one of the unique aspects of 
il- 
ia the Cobol language one 
needs to set up the parameters 
in the beginning of the program. 
It is definitely a structured 
language. In AI one must learn 
how to order the various rules. 



facts, variables, etc. making it 
much more structured than many 
articles imply. 

The Prolog language is not 

easier to learn than Basic or 

Pascal. I believe that a true 

5th generation piece of software 
should be easier to learn, more 
efficient, with a well written 
manual. 

MICROCOMPUTERS 
AID 
ARTIFICIAL 
IITBLLIGHICB 

Most versions of these two 
standards now work on general 
purpose (as opposed to 

dedicated) computers. The 

microcomputers with 10 bit CPU's 
or larger are now able to run a 
number of artificial 

intelligence developmental 

programs. This Includes both 
the 6B000 eerie© (by Motorola, 
such as the Mac and Amiga, etc.) 
and the 8035,8036, eeriee 

(80286,80386, 80466 C the 80486, 
a true 64 bit system, le 
presently used by the U.S. 
Dept. of Defense, especially In 

guided missiles; It le not 
available at this time to the 
general public! etc. by Intel 

used on IBM, Compaq, Epson, 
Tandy and compatibles) . The now 
microcomputer technology is 

quickly erasing the line between 
minicomputers and 

microcomputers. The 60386 can 
directly access 4 gigabytes of 
memory and has 64 tetrabytee of 
virtual memory access. 

In any language, there is the 
interpretive stage, the 

compiling and the linking stage. 
Most Lisp and Prolog program 
environments (usually AI 

environments need a 

pretranslator, editor, compiler 
and linker) require between 384K 
and 512K. A few will get by on 
as little as 256K while some 
need 04 OK. 

Almost ail versions on the 
market need a hard disk drive. 
Borland's Turbo Prolog, Prolog 
86, APT, and a few others don't 
need a hard disk, but many 
involved applications resulting 
froa these programs do need a 
hard disk. Still, there are a 
number of versions that are 
available for tbe novice to 
experiment on. The majority of 
serious AI (Artificial 

I nt e 13 lgence > pr og raasi ng 

environments need a hard disk 
and at least 512K. Prices range 
froa S100 to S6500. Prices do 
not necessarily reflect quality. 



A I THEORY: 

TRIALS AST) 
TH1BULATI0IS 

One of the major problems of 
practical AI is that It is based 
on several concepts that are not 
numerically oriented. 

The following are some other 
Industry problems concerning AI: 

1. It is supposed to be 
based upon a natural language. 

2. The process of learning 
is not even understood by 
psychiatrists, neurolinguiets, 
psychologists, or educators. 

3. Even when a software Al 
company considers a particular 
standard as being the proper 
one, they either give only a 
subset of the functions or 
change/add functions and don't 
mention It until you get the 
product. One euch example le 

the Borland Turbo Prolog which 
mentions a Clocksin-Kellish 

discrepancy in chapter 12 of 
their manual. 

4. Japan, the U.K., France, 
the U.S.A., and other countries 
differ In what is considered the 
proper AI standard. This mainly 
encompasses Lisp and Prolog and 
what Is the proper or best 
version. 

8. The definition of the 
nature of intelligence itsalf is 

quite unclear In both cultural 

and global concepte. 

Intelligence is not Just logic, 
symbolic thinking, or list 
processing. It is an 

integration of these 3, the 
Quantum Intuitive Leap Concept 
CQILC), and more processes not 
understood or even imagined. 

THB VARIOUS COICEPTS AID VHAT 
IS AGREED UP01 

Before explaining the QLIC 
concept (which is usually not 
considered by any computer 
specialists), I'll explain the 

elements that most specialists 

do agree upon. 

specialists have considered 
what le the nature of Hunan 
Intelligence with few clear 
results. 

Here are some of the areas of 
agreement: 

1. "Intelligent" activity is 

closely associated with symbolic 
manipulation. This has been 
observed in modes of 

communication such as words, 
sentences, diagrams, pictures, 
as well as less definitive 
actions such as facial and body 
expression. 
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2. Organization of thought 
Is usually like a rewrite 
process (like an author writing 
a book) constantly reassessing 
new Information in the light of 
the previous information. 

3. Rot all thought is 
forward structured (as most high 
level computer languages are at 
present). It usually contains 

looking at the whole (as In 

Ge6talt>, the parts, reviewing 

from the end to the beginning, 

various relationships as well as 
the creation of apparently 
innovative ideas. 

4. Much of the process of 
thought contains the elenent of 
vagueness. The process of 
reality definition involves a 
constantly reassessing 

perceptual experience. This 
hasn't been addressed In either 
the Creation or usage of nost AI 
versions or the resulting 

applications. 

5. latural languages are 
full of ambiguities. One well 
known example are these context 
sensitive sentences. "Time flies 

like an arrow", "Fruit flies 
like bananas", "The bird flies 
like the wind", "The jet flies 
to Chicago", etc. This must and 
Can be overcome. 

6. AI is frequently used in 
the 6-ane context qb "expert 

systens". Actually, expert 

systems are merely a branch of 
AI. "Expert Systems" ore usually 
set up to mimic how a specialist 

in a particular field would 

approach and resolve 

Information, problems, and 

explaining concepts. 

7. Expert systems have the 
ability to draw conclusions. An 
example frequently used 
explaining AI and ES (expert 
systems): A. All elephants are 
gray. B. Claude is an elephant. 
The computer concludes: Claude 

is gray. 

Principles can be built upon 
if there are sufficient rules 
and properly related facts. 

8. Sensory processes are 
difficult to duplicate in the 
computer arena. Bven a fly is 
better able to respond to 
sensory input. Robotics have a 
long way to go as well as speech 
recognition. 

9. A well designed AI 
program must be able to interact 

with other languages, the I/O of 

the computer, the wide range of 
needs of the programmers, less 
coding as opposed to other high 
level computer languages, easy 
to learn, as natural i «6 

possible, and be able to use all 



the capabilities of the 

architecture of the computer. 

CREATIVITY 
AHD 
COMPUTERS 

Personally, 1 consider 

ethics, creativity, honesty, and 
the ability to think and discern 
the truth to be the most 
important qualities a Human 
being can have, with compassion 
being equally Important. 

Sow, back, to the Issue at hand 
... creativity and computers ... 
If we can learn from history, 
then creativity is more 

possible. There are many books 

written that are full of 

inaccuracies. The Borth 

American school system la more 
concerned with the 3 r*s than 
with creative thought or action. 
In my short span of living, I 
have been in the "adult" age 
bracket since the decade of the 
QO's. I have witnessed a wide 
variety of truth distortion. 
Generally, this is a result of 

TV and other forms of mass 
media. Creativity can be 
distorted by encountering school 
systems and mass media in an 
Unbalanced manner. 

Just as a programmer tests 
for bugss to see if the prograa 
works, so too must we test the 
fabric of reality. I want 
people to thin* for themselves, 
question, and learn with a 
skeptical yet open mind. 

Computers are a new form of 

controlling tool for both 

machinery and humans. Computers 
can also be a creative outlet. 
They are amazing. 

When you use your computer 
are you being creative, 

productive, or at least 

learning? 

Creative computing can be 
productive for the programmers 
or users. It can also be 
destructive. 

CREATIVITY 
AHD STANDARDS 

Computers will soon be 

emulating human thought or 
appear to do so. The idea In 
this concept has been referred 
to as either expert systems or 
artificial intelligence. 

Painters, dancers, and other 
artiste can use the computer to 
create on, easily saving their 
ideas. Dancers can have three 
dimensional choreography from a 
computer system. Xusicjians also 
can use the cqmputer for various 
creative needs. , . . 



The creation of a new video 
game is quite creative, but the 
playing of it is no better than 
TV. It may be more interactive, 
but - except for specific 
airplane training and other 
machine simulation training, 
video games are not creative. 

Consultants can set up and 
design hardware and 

configurations suitable for 

various sized businesses. That 

too is creative. 

Creative computing is really 
related to creative use of 
existing and new technologies. 
The result should be a 
harmonious union between the 
users, (if in a business 
environment) business activities 
and functions with as little 
disruption as possible - Just an 
increase in quality 

productivity. 

Kany people see computers as 
scary, frightening, fancy toys, 
and awe inspiring. Until these 
people are used to computers, 
this may be the most common of 

reactions, Perhaps seeing thea 

as mechanical extensions of 
ourselves or as tools, our 
perspectives would allow more 
creative computing. Our hands 
are a tool of our body and a 
hammer Is ou external tool. 
Both aid in our productivity and 
creativity. 

For those in the conputer 

field, they are looking for new 

solutions to old problems. 
Before micros entered the homes 
of people, it was a challenge to 
write complex programs that 
using little nwrnory. 

Now that challenge is gone. 

Kemory is cheap and usually 
1/2 to 1 megabyte Is quite 
common. This situation allows 
for a wider range of programs 
but lowers the level of many 
creative computing attempts. 

Creativity now can be 

concentrated an the type of 
application as opposed to the 
development of the application. 

Vhen using a standard program 
application, sucb as data bass 
or word- processing, the software 
developers are looking for the 
little additions that will 
capture the and users. This 
means that standardization 

serves 2 purposes. 

1. If a larger segment of 
the population is going to buy 

and use the program (and more 
machines will run the prograa 
because of a standard) theft the 

consumer needs should t>e more 
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closely scrutinized. This is 
nece&sary for better marketing 
of hardware additions and also 
the software. 

2. Having hardware that will 
run a standard operating systen 
and communication protocols, 
allows Bore people to share in a 
wider range of computer 

communi cat ions , learning similar 
programs, with a greater general 
usage of the various peripherals 
(such as monitors, modems and 
printers). This allows high 
tech development of the 
peripherals, and this 

standardization allows for a 
more concerted effort in a 
variety of applications. 

Some systems are more business 
oriented, while others are 
dedicated to engineering, the 
arts (music and drawing), 

typesetting for publishing, and 
machine manipulation in 

industry. 

The new age of home business 
hoe become a reality. This 
includes the entrepreneur, 

consultant , programmer, 

executive, writer, and others. 

WHAT IS THE QOAITUK 

isrymvB lbap 

COBCKPT ? 

This process (in tho modern 
age) was conceived by those who 
analyzed the genius function. 
One famous person was Albert 
Einstein who deterained a number 
of aspects of Relativity before 
using math to describe them. 

It's said that he received the 

key concepts in a dream. 

QILC is only vaguely 

understood. There are many 
theories about It, but it is an 
idea difficult to grasp and its 
mechanism is generally 

considered a mystery. Kuch more 
could be written about this 
concept, but it is sufficient to 

mention it, so that the reader 
might see the enormous. task 
ahead in real AI development. 
This concept is examined and 
explained In part of an 
unpublished book <l hope it will 
be fully written and marketed 
within 3 years). This is a 
unique function of creativity. 
Vhen a quality standard is 

determined, well designed 

AI could truely begin. In the 
meantime, the market hae a 
number of products that attempt 
to emulate intelligence, 

supposedly allowing programmers 
an easier more flexible process. 
It has been referred to as fifth 
generation language and if that 



is where AI stands, then the 
sixth generation should truly be 
a natural language. 

SOKB BXAXPLES OP a I TERXS 

Backtracking - the process of 
testing statements in a matching 
process similar to a loop, 
testing the facts and rules 
until the final fact or rule, 
determining validity of the 
required goal. 

Conditions - are tha options 
presented in one or no-re rules. 

Elements - are objects or an 
ordered sequence making up a 
list. 

Expert system - the ability of 
a computer system to initate the 
ability of an expert in a 
speciality or field. A decision 
aid device. 

Fact - relationships between 
objects or a simple piece of 
data. 

List - a collection of 
constants, variables, and 

structures. It is an ordered 
sequence of elements. The 

contents are usually Independent 
of the structure of the list. 

Object - the name of a 
particular kind of element. 

Predicates - are the parts, 
objects, or subjects contained 
within a domain similar to the 
verb in English. 

Eule - a set conditions or 
sub-goals which mist be 
satisfied to make a true "fact**. 

PI HAL OVBRVtHV 

AI Is not a new concept In the 
caaputer environment, but In 
relation to other aspects of 
computer growth, it has been 
relatively slow In Its 

development. 

Industry sources estimate that 
applied expert systems will grow 
to one billion dollars by 1990. 
There are many AI packages that 
have recently entered the 

commercial market. 

The new public interest hae 
encouraged fast development of 
these packages, resulting in 
many incomplete manuals and 
programs. Thl6 field Is, at 
present, very open. For those 
who wish to get a jump on this 
new generation of software, read 
as many critical programmer 
reviews as possible. Opinions 
of experienced 6olld3y honest 
reviewers that can program and 
are not influenced by the 
opinions of others, can clarify 
this field extensively. Due to 
much of the cost of the wide 



variety of AI packages, quality 
and good solid standards have 
yet to be set. If you have the 
opportunity to personally 

explore AI, do it. 

Some packages claim how good 
the SQL- like (sequel query 
language) "natural language" 
Interface works. Personally, I 
have yet to see any "natural 
language" surpass a good menu 
system with context sensitive 
help and a command language. 

One should question any opinion, 

realizing that it le only an 
opinion and subject to error. 
Even though this is obvious, 1 
have yet to read any mention of 
this concept of doubt in a 
computer publication. It Is 
essential to creative and 
critical assessment of new 
products of either hardware or 
software. Still, there 1g the 
old saying "don't believe 
everything you read". I too can 
make errors just like anything 
humane create, Including 

computers. 

FIIAL COICUJSIOIS 

As readers can see fron the 

variety of ideas and concepts 

related to AI, this field could 
be slow in it's development for 

raauy years to como. Thle to due 
to the wide variety of problems 
and concepts Involved within 
this language environment. 

A! ha6 become something many 
modes of media ore now examining 
and sharing with the public. 

There has been an output of a 
wide variety of experimental 
software, some of which is 

supposed to be very 

sophisticated. "Test the water 
before you dive in!" 

The next generation of high 
level programming language is 
bound to include both procedural 
and nonlinear processing. To be 
both flexible and efficient, it 
will need to Include a balanced 
mixture of math and English 
which is found in many high 
level programming languages. 
There are several companies that 
are working on that now. That 
will be the true next generation 
of programming language, In my 
opinion. 

Written by Mark E. Perlmuter. 

Mark E. Perlnuter, a menber of 
K.P. Consultants, who Is 

available for consulting, 

technical manual writing, and 
computer product searches. He 
can be contacted at C phone) 
(416)493-0514, Canada. 
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BORDER IS DESIGIED for a 
DKP 105 printer. "Vhy a 
DKP 105 printer?", you 
may ask yourselves. Because the 
DKP 105 was on special at Tandy 
a few weeks afla; that's why I 
DQUKfct It. 

Bow again to the program. 
It Is designed to print a 
border of any type. At the 

beAlnni&K you are presented with 
a menu. Press • S* to start 
input. 

The computer will draw a grid 
over which you move a cursor, 
with the purpose of setting 
points wherever you wis':.. 

Any set point will be printed 
to the printer. You can also 
re&ot points to erase them. 

The f K f will brlag you back to 
the menu where you have the 
choice of either printing to 
printer, viewing the picture or 
even extending it. 

I did. not bother including a 
save and/or load routine, 

because I believe It Is su easy 

to create or recreate a border ■ 
a separate file would be 
unnecessary. 

As you can see In the 
sample-printout , the 

possibilities are rather 

Innumerable . Whatever you can do 

with 28 by 21 dots, consider It 

a border . 

At the beginning and end of 

the program, depending if you 

end it through one of the menu 
options and not <break> out of 
the program, I have written what 
1 call a title song. 

This title eon* will be a 
'Trademark' of nine which will 
accompany everyone of ay future 
programs. 

I would like to give my 
personal thanks to Cralx Steward 
for the idea. 

This program was carefully 
written on a CoCo 3 so that It 
should also work on a CoCo 2 ECB 
with a few modifications. 

The only change to be done is 
the high speed poke in line 560, 

and the possible omlltlag of 
comment lines. 

I think this is one of the 
best programs I have written so 
far and I will leave you with 
this for now. 

Have a lot of fun with it. 



by Harry Hoffmann 



The Listing: 



GOTO10 

5 SAVE"25a:3":HHD , 10 

6 GOT010 

10 CLEAR 5000:'** TRT LESS ** 

20 DIM P(28,21> 

30 DIM FC3.28) 

40 DIM H<28> 

50 DIM V<21) 

60 DIM B(28,21> 

70 POKE^IS;'** 2400 BAUD ** 

80 CLSO 

90 PRIBTS98," BORDER PRIHTISG PR 

OGEAK "; 

100 PRrBTeifl*," FOR DKP 105 PRIf 

TBR "i 

110 PRIBTG237," BY "; 

120 PRIBT«295," HARRY HQFFKANN " 

130 PRIIT936L" CSOVS BEST "; 

140 **************************** 
** TITIESQHG BY HARRY ** 
** HDFFXAHB CROWS BEST ** 

xxtxtxttttxtxttttttxtttntt 
145 •mmmm************** 

* THANKS TO CRAIG STEWARD* 

* FOR THE I DBA. * 

************************** 

150 GOSUB160:GOTO230 

160 FORXMTQ3:PLAT*T6D3V30L4CV2O 

L8CV10CL8V30CL16V20CV10CL8V30DL1 

6V20D¥10L8V30BL16V20EV10EL4V30CL 

8V16CV10CL4V3OFL8V20FV10FL4V30EL 

8V20EV10EL4.V30DL8.V20DV10D":NEX 

T 

170 F0SX=lTO3:PLAT , V30L8GV20L16G 

V10G":JBXT:PLAY"V30L4.GL8.V203V1 

0GV30L8FV20L16FV1OFV30L4EV20L3EV 

10EL4V30DL8V20DV10DL2V30GL4V20G\T 

10G": 

180 PLAY"V3QLaGV20L16GV10GY30L4. 

GV20LQ.GV1OGV30L8FV2OL16FV10FV3O 

L4EV20LBEV10EL4V3ODL8V20DV10DL1V 

30CL4V20CV 15CL2V10CV5C" : 

190 RETURN 

200 ■ 

210 * ***** KBB0 ***** 

220 ' 

230 CLS2:POKE65496,0;POKE65494,0 

240 G0SUB 1260 

250 PRIBTS109,CHR»(128) ,l iDenu' , CHR 

S(128); 

260 PRISTS 162," IS] START GREAT I 

BG BORDER "; 

270 PRIBT8226," [1] IHSTRUCTI0BS 

280 PRIHT5290," IP] PRIBT0UT B0R 



DER " j 

290 PRIBT8354," til EXTEBD PATTO 

B "; 

300 PRIBTS418," t V] VIEW PICTURE 

OBLY " ; 

310 PRIHTS482," t Ql QUIT PROGRAM 
•t . 

320 I»=IBXBY*:IF I*= M "THEB PLAY" 

T255V20A":GOT0320 

330 IF U="S"THBH460 

340 IF Ii-"I ,r THEH1270 

350 IF I$= M F'THBH1090 

360 IF IJ="X ,, THEH540 

370 IF IS="V"THEH1250 

380 IF UO"Q"THEfi320 

390 CLS8:GOSUB1260 

400 PRIBT«235,CHR$(128>"finlsh"C 

HR4 (128) ; : PEIHTG416, "" j : GOSUB160 

;EBD 

410 ' 

420 ' 

430 ' ** XAII PFOGRAH ** 

440 i 

450 ' 

460 PH0DE4,1:PCLS1:SCREEH1,1 

470 COLOR0 

480 FORX=0TO225£TEP8 

490 LlHE(X,0)-(X, 1695 , PSET 

500 BEXTX 

510 FOR X=0TO16CSTEP8 

520 LIBE(0,X)-<225,X),PSET 

530 HEXTX 

540 SCREEfil,l:I=2!Y=2:Z=4:H=l:V= 

1 

550 '**HI-SPEED** CHANGE FOR COC 

2*** 

560 POKE65497 , 0: ' P0KE65495, 0: ' *F 

OR COCO 2* 

570 IF PEEK(341>=247 THEI Y=Y-8: 

V=V-1 

580 IF PEEK<342>=247 THEB T=Y+8: 

V=Vtl 

590 IF PEEK(343>=247THEN X=X"8;H 

=H-i 

600 IF PEEK (344 )=247THES X=X+8:H 

=H+1 

610 IF V<=1THEB V=l ELSE IF V=>2 

1 THEH V=21 

620 IF X<=2 THEB X=2 ELSE IF X>2 

18THEH X=218 

630 IF H<-1THEB H=l ELSE IF H=>2 

8 THEB H=28 

640 IF Y<=2 THEB Y=2 ELSE IF Y>1 

62 THEB Y=162 

650 LIBE(X,Y>-(X+Z,Y+Z),PSET,B 

660 FOR DL=lTO10:BEXTDL 

670 COLOR 1 

680 IF PEEK(340)=251 THEB LIHE(X 

-l,Y-l)-(X+5, Y+5),PSET,BF 

690 LINE<X,Y>-<X+Z,Y+Z>,PSET,B 

700 FORDL=lTOl0:BEXTDL 

710 COLORO 

720 IF PEEK<339>=254THEN LiffECX- 
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1, Y-l>- «X+5 , T+5> , PSET, BF 

730 IF PEEK<33*>=254 THEH EXEC44 

539 

740 IP PPOIHTU+2,Yf2)=0THEN P(H 

,V) = 1 ELSE P(H, V)=0 

750 IF PEEK(343>=253 THEH 770 

760 GOTO 570 

770 FOR C=1T0 H 

760 IF P<C,1>=1 THEH ECC,1> = 1 EL 

SE E<C,I>=0 

790 IF P(C,2>=1 THEH ECC,2>=2 El 

SE E(C,2>=0 

800 IF P(C,3)=1 THES E(C,3)=4 EL 

SB E<C,3>=0 

810 IF P(C,4)n THES E(C,4>*8 EL 

SE E(C,4)=0 

620 IF P<C,5)=1 THE* E(C,5> = 16 E 

LSE E<C,5>=0 

830 IF P<C,6)=1 THEI B(C,6>=32 E 

LSE E(C,6>=0 

840 IF P<C,7)=1 THES E(C,7)=64 E 

LSE E(C,7)=0 

650 IF P<C,6)=1 THEH E<C,&> = 1 EL 

SE E(C,8)=0 

860 IF P<C,9)=1 THES E(C,9>=2 EL 

SE E(C,9>=0 

870 IF P(C,10)=1 THBH B(C, 10>=4 

ELSB B(C, 10>=0 

880 IF P(C, 11>=1 THBI E(C, 11)=8 

ELSE H(C, 11>=0 

890 IF P<C,12>=1 THBI E(C,12)=i6 

ELSE E(C.12)=0 
900 IF P(C,13)=1 THSH E(C,13)=32 
ELSE E(C,13)=0 

910 IF P(C, 14>*1 THEH B(C,14)=64 

ELSE E(C.14>=0 
920 IF P<C, 15)=1 THEI E(C, 15)^1 

ELSE E(C,15)=0 

930 IF P(C, 16>=1 THEH E<C, 16>=2 

ELSE B(C,16)=0 

940 IF P(C,17>=1 THEH ECC, 17)=4 

ELSB E<C I 17>=0 

950 IF P(C,18> = 1 THSH E(C, IS)=8 

ELSB E(C ( 18)«0 

960 IF P<C,19)=1 THEH E<C,19)=16 

F.LSE VAC, 1Q)*0 
970 IF P(C,20) = 1 THEH E(C,20)=32 

ELSE E(C,20)=0 
980 IF P(C,21>=1 THBH E(C,21)=64 

ELSE E(C,21>=0 
990 F(l,C)=E(C ) l)+E<C,2)tE(C,3>+ 

E<C,4>+E(C,5)tE(C 1 6)+E<C,7)+128 

100O F(2 t C)=B(C,8)+E(C,9>+E(C,10 

>+ECC,U)+ECC,12)+ECC,13)+E(C i 14 

>+128 

1010 F(3,C>=B(C 1 15">*E(C,16)+E<C, 

17)+E<C.18)+E(C 1 19)tE(C,20)+ECC l 

2D+128 

1020 NEXTC 

1030 "* RESET HI-SPEED * HEED HO 

T TO BE CHARGED FOR COCO 2 OR CO 
CO 31 

104O POKE65496,0:PO£E65494,0 

105O GOTO230 

1060 * 

1070 •** PRIHTIHG RO0TIHE ** 

1080 ' 

1090 SCRBEI1,1:PRIIT#-2 1 CHR*(18) 

I'SET GRAPHICS PRIHTER KODE 

1100 FOR R=1T017:'*CHAHGB <17> F 
OR DIFFEREIT VIDTH PAPER******** 
* 



1110 FOR X=1T0 H 

1120 PRIHT#-2,CHR*<F(M>>; 

1130 HEXTX.R 

1140 PRIHT#-2,CHR»(13); 

1150 F0RR=1T017: ■ *CHAHG£ FOR D1F 

FEREHT VIDTH PAPER ************* 

1160 F0RX=1T0 H 

1170 PRIHT#-2,CHRi<F<2,*>>; 

1 180 HBXT X, R 

1190 PRIFT#-2,CHR*(13); 

1200 F0RR=1T017: ' *CHAHGB FOR DIF 

FEREIT VIDTH PAPER ************* 

1210 F0RX=1T0 H 

1220 PRIIT#-2,CHR*(F(3,X)>; 

1230 IEXT X,R 

1240 PRIHT#-2 I CHR*(30): '*RESBT G 

RAPHICS PRIHTER KODE** 

1250 SCREEHl.MF IHKETS=""THEI 

PLAVA":OQTU125U ELSE G0TO230 

1260 PRIST&34," BOEDER BY HARRY 

HOFFXAFN " ; : RETURN 
1270 CLS4;GQS0B126Q 
1280 PRINTG106, "instructions"; 
1290 PRIHTffl62,"THIS PFOGRAK VAS 

DESIGNED "; 
1300 PRIHT«194 ) "FOR k DIP 105 PR 
IHTER, USIIG' 1 ; 

1310 rftIBT«226,-0RDlfAKt A4. TYP1 
HG PAPBR. "; 

1320 PRIST^SS/'AFTER PRESS I HG T 
HE S-KEY II "; 

1330 PRIIT*290,"THB nenu, USB TH 
E 4 ARROVS M ; 

1340 PRIHT<S322,"T0 MOVE THE CORS 
OR. TO SET A"; 

1350 PRIHT8354,"POIIT USE THE A- 
EBY. TO »; 

1360 PRIHTG386, ,, RBSET A POIHT, P 
RESS <R> . . "i 

1370 PRIIT$418,"TRY A ABD ARROV- 
KBY TOGETHER"; 
1380 PRim482, "PRESS AIY KEY TO 

COBTIIUE "; 
1390 EXEC44539 
1400 CLS5:GOSOB1260 
1410 PRIIT«98."PRESS TVO ARROWS 
TO KOVB •■; 

1420 PRIIM130, "CURSOR TOWARDS A 
FY CORHER "; 
1430 PRIHTG162. "DON'T VORRY ABOU 



T DIFFERENT '*; 

1440 PR I HTG194," LOOKING, BLACK S 

QUARES. "| 

1450 PR1ST(5228,"THEY KEAH EXACTL 

Y THE SIKE. "; 

1460 PRIBT^SS/'OHLY TOTALLY VHI 

TB SQUARES "; 

1470 PRIffT©290,"ARE not SET THE 

REST IS SET "; 

1480 PRIBT<5482 1 "PRESS AST KEY TO 

CONTINUE "; 
1490 EXEC44539 
1500 CLS6 
1510 GOSUB1260 
1520 PRIHTS98,"VHEH FINISHED THE 

PICTURE, "; 
1530 PR:HTiei30,"HOVE THE CURSOR 
A3 FAR TO "; 
1540 PRI1T«1'62, ,, THE RIGHT AS YUU 

CAN OR VILL"; 
1550 PR1IT(5194,"THE HORIZOHTAL P 
OSITION OF "j 

1560 PRIHT«226,' , THE CURSOR DETER 
MINES THE "; 

1570 PR URtaSS," VIDTH OF THE PR1 
HTED PICTURE"; 

1580 PR!irr«322, ,, TO LEAVE THE CRE 
ATIVE HODE, "; 

1590 PRIHT<S354, ,, PRESS <H> FOR HE 
Htf "j 

1600 PRIBTSSSVPFESS <®> TO RES 
T THE CURSOR"; 
1610 PRIWS482,"PRESS AIT KEY TO 

CONTINUE "; 
1620 EXEC44539:GOTO230 
1630 ************************* 
1640 * CSBAYED KAY/JUHB/10S7 * 
1650 * 3Y HARRY HOFFHAHH * 

1660 * CROVS NEST CARAVAN PK * 
1670 * CROVS NEST QLD 4355 * 
1680 ************************* 



1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 



# ATTENTION FOR LOV # 

# KENORY COMPUTER USERS # 

# ALL COMMEHTS VITH OR # 

# VITHOUT A<"> CAH BE # 

# OMITTED - TRY TO CLEAR* 
If LESS THAN 5000 # 
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IF Villi IFYnU IF Villi IFVBU IFVOU IfVDU IFVDU IF Villi IFVtlU IF 'i 
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llfttlJ CnHVDUCHHVnurFHYaU CRMVOU CHHVOU CfiHVnU CRMYDU LRHYDUr 
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16K ECD 



GRAPHICS ENTRY 



by Martin Eade 



HBRB ARE THREE graphics 
prolans for the "Quick 
on the Draw" corapet ition. 
The three programs are called 
On their order of 

presentation): "Dr Vho", "MTV" 
and M Eye ball". 

"Dr Vho" took me a lon^ tine 
to Mke, especially considering 
that it has two graphics screens 

to alternate between. 

"Byeballs" was written by ne 
and a friend of mln«, P^ter 
Vrixht. 

"MTV" is all my own creation. 

Enjoy! 



The Listing; 



'm***BT HARTIH EADE ******** 

1 »********27/4/1987************ 

2 G0T05 

3 SAVE"260:3":EirD*6 
5 PCLEAR4 

1 P K0DB4 , 1 : SCREEH i , 1 : PCLS5 ; COLO 
BO 

ii LiHEC66,i64)-(66,ii) t psET:Lis 

E-<lll ? Ii),PSET:LIB'E(iee,llJ-<20 
0,11),PSET:LIHE-(200, 100), PSET 

12 DRAV"8K115,105;C0;R2D1R1D1F2D 
RDRDR4U2RURURUR2UR3URU2R02D 

13 LIHEC135 t 99)-(143, 113), PSET: L 
INE- (136, 103), PSET: LIHE- (123, 114 
) , PSET: LINE- (115, 106) , PSET: LIHE- 
(115, 105), PSET 

14" PAIHTUSS.llD.O.OiPAIHTUSO, 

106) ,0,0 

15 LIHEQ10.123)-(113, 123), PSET: 
LIHEU13, 122)- (115, 122), PSET: LIN 
EU15, 121)- (121, 121), PSET: L1IEU 
16,120)- (120, 120), PSET :LIHE< 120, 
122)-(125. 122), PSET: LIHE (124, 121 
)-<130,121),PSET:LIHE(125, 120>-< 
130, 120) , PSET: LIHEU31 , 122>- (133 



, 122 >, PSET 

16 LINE:i33,123)-(136, 123), PSET: 
LIHEC122, 125)- (124. 125), PSET: LIN 
E< 116,12V)- (118, 1295, PSET: LIFE- ( 
120, 127). PSET: LINEU26, 127)- C128 
, 129 > , PSET: L I HE- ( 131 , 127) , PSET 

17 LlHEt67,169)-<67 1 150),PSET:LI 
HE-(98,125),PSET:LIHEUQ6,114)-( 
109, 106) , PSET; LIKE- U13, 103: , PSE 
T:LI»E-:il3, 101>,PSET 

18 LIHEU65,113>-U57, 131), PSET: 
LIHE-(149, 133), PSET: LIFE- (143, 14 
OJ.PSET LIHE- (126. 144). PSET: LIHE 
-(124,142),PSET;LINE-(116,143).P 
SET: LIS3- (112, 142), PSET: LIHE- (10 
6, 146), PSET 

19 LINE- (106, 153), PSET: LIITE- (110 
, 153>,FSET:LINE-(118, 155),PSET:L 
IFE-<119,160),PSET:LINE-(124,165 
>, PSET: LINE- (121, 169), PSET; LIHE" 
C109 f 170), PSET: LINE- (128, 170), PS 
ET:LINE- (133, 169), PSET: LIHE- (130 
, 166) , PSET: LINE- (137, 160), PSET :L 
IKE- (145 ,160) .PSET 

20 LINE- (145, 163), PSET: LIHE-U58 
, 162), PSET: LINE- (151, 160), PSET: L 
INE- (151, 155), PSET: LINE- (158, 147 
) , PSET: L IKE- (162, 142) , PSET : UHE- 
U60| 142) , PSET: LIHE- (157, 145) , PS 
ET: L INE- (155, 145) , PSET: LINE- (149 
,147). PSET; LINE- (137, 149), PSET: L 
INE-C135, 148), PSET; 

21 LIHE-(147,141),PSET:LIHE-U58 
, 135 ) , PSET: LIHE- (167, 117) . PSET: L 
INE- (165, 113), PSET: PA1HTU4), 155 
>,0.O 

22 LIHEU55, 145>-(164, 134), PSET: 
LIBE-U70, 126),PSET:LIHE-<180, 10 
2), PSET: LINE- (179, 96), PSET: LIHE- 
<184,80),PSET:LINE-(186.63),FSET 
:LINE-(187,79),PSET 

23 LINE(163.190)-U72, 135), PSET: 
LIFE- (169, 127), PSET: LIHE- (171, 13 
1), PSET; LIHE- (175, 121), PSET; LINE 
-(179, 121),PSBT:LIHE-(187, 128) , P 
SET: LINE- (206, 132) , PSET 

24 LIHE(206,143)-(185, 128), PSET: 
LIHE- (180, 128), PSBT: LIHE- (176, 12 



3), PSET: LINE- (176, 123). PSET: LIHE 
-(172, 147), PSET 

25 PAIHTC173,133),0,0:PAIHT(165, 
127), 0,0 

26 LIHE(98, 125)- (97, 1175, PSBT: LI 
HE- (95, 117), PSET: LI HE- (93, 115), P 
SET: LINE- (92. 116), PSET: LI HE- (87, 
112), PSET: LIRE- (89, 110), PSET: LII 
E- (89 , 106) , PSET: LINE- (85, 99 > , PSE 
T: LIHE- (85, 96) , PSET: LIHE- (86,91) 
,PSET:LIHE-!91,85),PSET 

27 LlBE-<89,87), PSET: LIHE- (87, 84 
>,PSKT:LINE- (85,88). PSET: LIHE- (6 
2, 85), PSET: LINE- (84, 75) , PSET: LIB 
E- (84, 72), PSET: LINE- (80, 63), PSET 
: LIRE- '83, 53), PSET: LIHE- (81.53), 
PSET: LINE- (84, 41 ) , PSET: LINE- (96, 
34),PSET:L1NE-(87,30),FSET:LIHE- 
(94,20), PSET: 

28 LINE-<105,14),PSET;L1BE-<105, 
11),PSET:PAIHT(95,15),0,0 

29 LINEU86,H2)-(193, 109), PSET: 
L INE (187,110)- (193, 106), PSET: LIH 
E (180, 102) -(191, 106), PSET: LIHEO 
88, 104)- (194, 104), PSET: LIHE- (197 
, 100) , PSET: L INE ( 188, 104 )- (196, 97 
) , PSET: L1NE( 186, 96) - (189, 100) , PS 
ET: LI NE(192, 100) - (196, 94 ) , PSET 

30 L1NEU66, 11)- (182,21 >, PSET: LI 
HE- (192,51), PSET: LIHE- (200, 72), P 
SET; LIHE-U97, 75), PSET; LIHE- (197 

,81), PSET: LIFE- (196, 85) , PSET: LIB 

E- i 198, 83) , PSET: LIHE- (200, 86) , PS 
ET: LINE- (196, 91), PSET: LIHE-U92, 
100), PSET 

31 PMHT(195,30),0,0:PA1NTU99,8 
O),0,0:LlNE(200, 100>- (205, 104>.P 
SET: LINE (202, 101)- (200, 103), PSET 
: LINE- (196,99), PSET: PA I HTQ97, 93 
),0,0 

32 LINE(99,125)-(96,130),PSET:LI 

HE- (90, 133), PSET; LIKE- (89, L33),P 
SET: LINE- (95, 130). PSET: LIHE (96,1 
30)- <102, 131 ) . PSET: LIHE- (106, 136 
), PSET: LINE- (112. 142), PSET: LIHEE 
103. J.33) -<88,165), PSET 

33 LIHE(116,89)-(117,82),PSET:Ll 
HE- (119, 80), PSET: LI HE- (119, 76).? 
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SET:LINE-U20,71),PSET:LIKE-U15 
, 73) , PSET: LIRE- (117, 82), PSET; LIB 
E-U16,89),PSET:PAIHTai8.75),0, 


34 LIHEU16,72>-(106,70),PSET:Ll 
HE-<104-,71>.PSET:LlHEai6.75>-(l 
10,73),PSET: LIBE- (105, 76), PSET: L 
IRE<115,79>-(104,79),PSET:LIRE(1 
14,78)- (106, 78), PSET: LIBE<111, 77 
)-(112,77),PSET:LIBB(103,80)-<10 

s.ao.pSETjLiiEcni.ew-uia.eo) 

,PSET 

35 LIRBU06, 81X108, 81), PSET:LI 
HE ( 1 1 1 , 8 1 ) - ( 1 1 3 , 8 1 ) , PSET : L I N E < 1 
7,82)-(112,B2),PSET:PSETU08.83, 
0>: PSET (ill, 83,0): PSET (109, 84,0) 
:LlHE(121,75)-(l24,75>,PSET 

36 LIHE( 102, 81)- (106, 84), PSET: LI 
NE(102,86)-(10e, 88), PSET: List- (1 
13,84), PSET: LIRE(127,71>- (126, 71 
), PSET: LIRE- (126, 73), PSET: LIBE- ( 
128, 75) , PSET; L IBB- 1136,75) , PSET: 
LIHE(134,74)-C137,74),PSET:LIBE( 
135,73)- (138, 73), PSET: LIBE (136, 7 
2)-(139,72>,PSET: 

37 LIREU33,71)-(141,71),PSET:LI 
BEU28,75)-(136,75),PSET:LIBE(12 
9,76>- (135,70) , PSET: LIBEU29, 77) 
-U34,77),PSET:LIRE(129.77)-(127 
,81), PSET: LISE- (129,82), PSET: PSE 
K135, 77-, 9?;11SEU37, 77)- (148,77 
), PSET: LIRE (14 0,76)- (142, 76), PSB 
T!LIHE(136 i 78)-(14e.78),PSET 

38 LIHE(149,78)-(150 1 78>,PSET:LI 
NE( 138, 79)- (140, 81), PSET: PSET (13 
9,79,0):PSET(141,81,0>;LIBEU42, 
70>-<H7 t 79>,PSET ! lI¥B<H2.80>-( 
144,80) ,PSET:PSETC147,80, 0):PSET 
(144,81,0): LIKE (137, 80)- (137, 81) 
, PSET: PSET (138, 82,0): LIRE (139, 83 
)-(142,83),PSET 

39 LIKE-U43,81>,PSET;LIRBU34,8 
1>-(134,S2),PSBT:L!BE-(138,85),P 
SET!LIHE-(142, 65), PSET: LIBE- C146 
1 82),PSET:PSET(140,86) 

40 LIBE(133.66>-(135,e7),PSET ; LI 
RE- (138,91), PSET: LIBE- (145, 91>,P 
SET:LlB£-(147,88),PSET:LIHE<141. 
71>-(145,73),PSET:LIBE(146,72>-( 
148, 74), PSET: LIRE <150, 75) -(152, 7 
4>, PSET: LIRE ( 153 ,76>- (155,79), PS 
ET: LIRE- (157, 78), PSET: LIRE (154 ,8 
5)-<154,84),PSET; 

41 LIBE-(156,83),PSET:LIBE(103,1 
49)-(107,180),PSET;LIBE-(117, 180 
), PSET: LI BE- (126, 171), PSET: LI NEC 
110, 181>-ni0, 190) , PSET: LIHEC111 
,181)- (11 1,190), PSET: LI HE (105, 14 
8)-<103, 148), PSET 

42 LIRE(121,190)-<133 1 188),PSET; 
LIRE-(133, 190) ,PSET:L1BE(134, 187 
)-(134,170),PSET:LIRE(135, 170)-( 
135, 178) . PSET: LINEU35, 170)- C 139 
,170),PSET:LIHE(140,171)-<139,17 
2>,PSET:LIHE(141,166)-(141,167), 
PSET: LIRE- (156, 182), PSET: LIRE- (1 
57, 181), PSET: 

43 LIRE-(156,181),PSET:LIHE(161, 
17?>-<165, 161), PSET: HREU03, 164 
)-(163, 159), PSET: LIBE (164, 158)- ( 
164,143),PSET:LINE<163 t 155>-<163 
,143),PSET;LIREU65,153)-U65,14 



4), PSET 

44 LIHEC174, 138)-<i77,135),PSET: 
LIBE- (180, 135), PSET: LIBE- (185, 13 
7) 1 ?SET:LIBE(134,173)-<127.173), 
PSET:LIHB(133,175)-(126 ( 178),PSE 
T: LIBE (133,177)- (126, 180), PSET: L 
1HEC133, 18n-(129,184) 1 ?SET 

45 LIHEC150,l73)-(l55,i ,, 9).PSET: 
LIBE- (157, 179), PSET: LIRH-< 161, 17 
1), PSET: LIBE- (159, 171) .PSET: LIBE 
-U54, 175), PSET: LINE- (150, 172>,P 
SET:PAIMT(158 ( 173),0,0 

46 LlBEC109 4 9)-(12O,6),PSET:LIBE 
-(129,4>,PSET:LIHE<111,58)-C118, 
58),PSET:LIHE(119,59)-(129,59),P 
SET: LI RE- (136, 56), PSET: LIBE- (147 
,56), PSET: LIHEC143, 57) -(153,57), 
PSET:LIHEQ30,64)-<135,52) ,PSET: 
LIRE- 1139,59 J, PSET 

47 LIBE<83, 170) - (88, 165) , PSET: LI 
BE-(91, 165), PSET: LINE- (101.156), 
PSET: LIBE- (101, 157>,PSET:LIBE-(9 
2,163),PSET:LIHE-(83,170),PSET:L 
INE(85, 147)- (78,160). PSET: LlHE-( 
79,162).PSET:LrNE-(77,163),PSET: 
LIRE- (76, 172) , PSET: LIBE- (72, 179) 
, PSET: LI HE- (73, 189), PSET: 

48 LIRE- (75, 179), PSET: LIRE- (79, 1 
76), PSET: LI RE- (77, 165) , PSET: LIRE 
(78, 175>-(78,181),PSET:LIHE(77,1 
82)- (77, 187) , PSET: PAIXT(77, 174) : 
LIBE (67 ,185)- (67, 189) , PSET: LIBE( 
68,175)-(68,189),PSET:LIHEC69,18 
7)-<69, 189), PSET: L IRE CCS. 157)- (6 
2, 161), PSET: 

49 LIRE- (63, 163), PSBT: LIBE- (59,1 
70; .PSET: LIRE- (57, 16S>. PSET: LIRE 
-(56, 169), PSET 

99 F0RA=lTO160O:HEXT 

100 PXQDE4, 1:SCREEH1,0:PCLS5:COL 
ORO 

101 DRA\rBH76,84jXS4, 116X93, 116H 
99,94X102,94X108,116X117,116X124 

,90x126,90x126.116x135,116x135,1 

02X142,102X142,116X151,116X151,9 
0X154, 90M154, 92: BH153. 93; K153 . 10 
8;BX154,109;X154, 110X161, 117H173 
,117X180, 110X180, 109;BX181,106;X 
181,93X175,81X142,81" 

102 DRAVX142, 91X135, 91X135, 81X1 
19, 81X113, 100X107, 81X95,81X89, 10 
0X33,81X62,81X62,82X63,82X76, 126 
X185, 126X201, 74;BX76,e6;X69, 86X8 
0, 121X181, 121K193, 79; BM196, 78X18 
4,120X181,123X80,123X67,85X77,85 
;BX79,85;X86, 113X91, 113X96,91X10 
4,91X110,113X115,113" 

103 DRAVX121, 93X121, 84X116, 103X 
110,103X105,84X97.84X91.103X86,1 
03X80, 83X80, 86 ; BX80, 83; X65, 83X77 
, 124X184 , 124X198, 77X182, 77; BX198 
1 77;X1Q3,124;BX78, 1241X66,83" 

104 DRAV"EX121,84;X132, 84X132, 94 
X145, 94X145, 84X174, 84X178,93X178 
, 108X173, 1 14X161, 114X156, 108ftlb6 
, 93X159, 86X151 , 86; BX151, 87; X154. 
87; BX151, 85; X148, 85X1 48, 113X145, 
113X145,99X132,99X132,113X129,11 
3M129, 85X1 26, 85X126, 87X124 , 87X12 
4,84" 

105 PAIRT(89,107);PA1HT(99,8S):P 
AIHT(113,108); PAIMT (140,96) 



106 DRAV"BX159,94;H165. 90X159, 90 
M175.96H175, 105X169, 111X165, 111X 
159, 105X159, 94 ; BX162, 96; X165, 93X 
169,9311172,96X172,105X169, 108X16 
5, 108X162, 105X162, 96" :PAIBT(172, 
86) 

107 DRAVBX98, 61; X87, 61X87, 74X66 
, 74X66,79X110, 79; BB112, 79X150, 79 
j BM162, 79; X176, 79X176, 66X180, 66X 
180,69X176,69 

108 DRAV"BX98,61;X101, 67X101.71X 
100, 73;BX101, 74 ;X104, 74X104,65X1 
08,61X114,61X118,65X118,74X124,7 
4X123,70X124,66X129,61X134,51X13 
8, 65X138 , 68X134 , 68X134 , 66X129 , 66 
M129, 75X134,75X134, 72X138, 72X138 
, 74X144, 74X144 , 65X139, 65X135, 6 IX 
153, 61 HI 53, 65" 

10y URAW'X14y, 65X149,7411154, 74X1 
54,65X158,61X164,61X168,65X168,7 
4X171,74X171,61X184,61X186,63X18 
6, 69X184, 71; BX185, 72; X185, 74X201 
,74" 110 DRAVBX193, 79; M180, 79X18 
0, 73X176, 73; BX182, 77; X182, 64X174 
,64X174, 77X163, 77X163, 75X165, 73X 
165, 65;BX166, 66; X166, 75X165, 76; B 
X167,76;X171,76;BX173,76;X173,63 
hl64,63Wl84 < 69;BX163.70;X183,63; 
BX178,71;X182,71;BH183 4 72;X183,7 
6X198, 76" : FAIHT (165, 75 ) 

111 DRAtf"BX165,64;M163,64;BX164, 
63 ; X15fi , 63 ; BX159 , 64 ; X157 , 64X157 , 
75;BX156,65;X156 1 74;BX158,74;M15 
9,75X159,77X156,74" 

112 DRAWBX161, 76; M161, 75X159, 73 
M159, 66; BX160, 65; X162, 65; BR163, 6 
6:X163,73:X161,75;BX150.77;X113, 
77; BX156. 76; X149, 76; BX144, 76; M13 
8, 76; BK146, 76; X146, 64; BX147, 64; X 
147,76;BX141,63;X151,63;BK135.76 
;X136, 76X136, 74" 

113 DRAVBX128, 76; M126 , 74X126, 86 
H129, 63X134, 63X136,65X136, 66; BX1 
27, 75X127, 66X129, 64X135,64;BX125 
,69;X125,71;BX126,76;X117,76;BX1 
13,77^113,75X115,73X115,66X112, 
63 ; BX1 15 , 76M1 16 , 75H1 16 , 65X114 . 63 
Ml 08, 63X1 06, 65X106. 74X108, 77X109 
, 77X105, 75X107, 73X107, 65" 

114 DRAV"X109,63":PAIHT(114,75): 
PSET < 125, 75> : DRAVBX109, 77M94 , 77 

;BX106,76;X98 1 76;BM96,76;X94,76; 
BM92, 79 ;X92, 66X95, 66 ;BX96, 67X96, 
73;BX95,74X92,74;BH98,74;XS8,65; 
BM99,67X98,71;BX97.66;X97,63;M89 
,63X89,76X68, 76; BX68, 77X90,77X90 
,64;X96,64" 

115 PSET(97,75):PSET(99,75):DBAV 
M BX111,78R111, 75X109, 73K10S, 66; B 
X110,65;X112,65;BX113,66;M113,73 
XI 11, 75" 

60000 FORB=lTO1600:REXT:SUH 



The Listing: 



REX MTV BY XARTIH EADE 15/5/87 

1 GOTOIO 

3 SAVE"260A:3 M :EHD*6 

10 PXODE4,1:PCLS5:SCREEN1,0:COLO 

RO 

20 DRAV'BR&O, 185H2V2HUHUH2V2EX74 
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, 172LH05HUEUE2KERE2REREU2E2REUE2 

UER5E3RE3R2FR3FD3GFRF2RFRFR3U4EU 

5ERF2MF2D4FD2F2DF3DF2RF2EFD4GD2 

CD2CDG3DGDG2DG2L2CLHL3HLH2UHLHU3 

LG2 LE5L8GL2D2GL4G3LGL2" 

30 DRAV , BK40,120M40,11M90,11HUO 

,40X111,4011131 ,11X180,1111180.548 

X180, 11X190, 23X190, 39BX19C, 56X19 

0, 107X180, 120K180.7IBX180, 120X13 

0,120X130,66X111,106X110,106X91, 

66X91,120X40,1208X91,12011100*107 

X100.83BX90, 11X114. 35BX111, 106X1 

30, 73'" 

40 DRAVBX134, 110H134 .56M113. 80X 

108,82X106,79X107,75X153,16X157, 

14X159, 16X159, 19X140, 45X140, 110X 

139, 113X135. 113X134, 110BH151.56X 

164 , 78H165 , 78X197 , 29X203 , 26X207 , 

28X20? , 32H163, 95X164, 95X143, 60X1 

43,571(147, 55X151,56" 

50 DRAVBK46.137U13X51, 130X56, 12 

5D13BK59, 125D13R8U13BX70, 137R6U7 

L8U5R&BX80, 137U13BX89, 137L7U13R7 

BX98, 137U13NL4R4BM110, 137L6U6SR4 

U6R6BH119, 137L7U13BX128, 137L6U6H 

R4U6R6BX130, 125X132, 137X134. 125B 

X141,137R8U7L805R8BX138,137V13" 

60 DRWBX151, 137U13BHlb4, 137U13 

R9D13L9BX173, 125D13XL65, 125D13BM 

83,161D10BX91, 161L6D5R6D51.6BX97, 

161D6ITR5D4BX102, 161D10BX110, 161L 

6D5HK3D4R6BX112, 17OU10R5D5L4BH11 

4, 167X117, 170BX125, 161L6D5SR3D4R 

5BH129,161D7":PSET(128,173) 

70 PAIHT(187,80):PAINT(167,30):P 

AlHT<97,90>:PfllHT(110,33):PAIHTt 

129,71) 

60000 QOTO60000 



The Listing: 



POKE55495.0 

1 GQTQ10 

2 REX EYEBALLS BT XART1H EADE Aff 
DPETER VRIGHT 1987 

3 SAVB"260B:3":END'6 

4 END 

10 PXODE4,1:PCLS5:SCREEH1,0:COLO 

RO 

20 CIRCLEU42,100>,13,,1.5:CIRCL 

8(115,100), 13, ,1.5:CIRCLE(138 ( 9& 

),4:CIRCLE(120,98>,4:PAIHTH38,9 

6): PAI»T(119,98> 

30 DRAV"BK16,4X5, 16X13, 14X3,33X1 

3, 29X4 , 49K15, 45M2 , 67X12, 63X4 , 84X 

13,801(5,96X10,94X1,314X10,110X1, 

129X11, 125X3, 143X10, 140X1. 160X12 

, 153X3, 180X47, 170X35, 181X99, 167X 

87, 179H140 , 169X129, 180X180, 169X1 

66, 178X206, 173X235,162X226,160X2 

24,147X228,144" 

40 DRAVM224. 128X232. 122X245. 103 

X334, 99X249, 82X236, 74X250, 61M231 

,51X247,39X232,31X240,20X236, 16M 

249,5X228, 6X187, 19X186, 10X154, 15 

X151, 7X120, 17M118, 9X95, 14K89, 12M 

75,12X77,3X47, 16X45,6X24.12X22,3 

X16.4" :PAIHT(60,60) 

60000 GOTO60000 
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SEE YOU AT 



CONF 

BUNDEENA NSW 



AUGUST 8&9 



Conl '87 Is to be held at 
the Uniting Church's campsite 

in Bundeena «SV. 

This Is a particularly pretty 
area of Sydney! situated on the 
northern tip of the Royal 
■atiooal Park, In Port Hacking. 

The water views are fabulous, 
and the busbwalks are anoungst 
the best In Australia 

Getting there Its uut a 

problem. 

Bundeena la reached through 
the Royal national Park by road 
or by train to Cronulla and 
ferry from the nearby wharf to 
Bundeena. 

The conference will be Jam 
packed with all sorts of things 
to see and dot 

Tha big now* this year Mill 
obviously be tbe growing use of 
OS-9 Level 2 on the CoCo 3's; 
and Conf '87 Mill be the 
definitive place to Bee this 
excellent system 

By that tinw Initial users 
will have bad time to sort the 

system out ood create soae 
really Interesting stuff. 

But it is not Just OS-9 that 
Is of interest this year. 

Blaxland Computer Sevicee 
have Imported a wide range of 
new products for the Tandy CoCo 
3 and all of this will be on 
show and in use. 

Sane of these products are 
very exciting. For example 
Colour Kax 3 should be available 



at the show - a colour version 
of GoGoKax. 

Paris Radio will be bringing 
their Sculptor based accounting 
package, all the new OS-9 
packages for the CoCo 3, an 
Atari running OS-9, thsy'll have 
a big nodea sale, featuring the 
BAYES compatible Avtek 

fteganodea, the latest version. 

They will also be oonnco-tod 
to "Infocenter", Paris Radio's 
on-line information service. 

Infocenter was one of the 
first on-tine services in 

Australia and continues to be a 
source of progams and 

information for Taney conputer 

owners. 

Parle will also have an 
enornous bookshelf, including 
"CoCo 3 Peeks and Pokes". There 
will be memory upgrades for the 
CoCo 3, Macintosh software 
running on the Atari, and 
possibly an Oki Laser Line 
printer working with the CAD 3-D 
software package for the Atari 
1020. 

Vith the release oi the new 

T1000 EX and SX, Interest in 
these machines has aever been 
higher. w*e' 11 have a nuabcr of 
these computers at the 

conference, as well as their big 
brothers, the T3O0O series, 
which we'll be putting through 
their paces. 

We've had continuiag interest 
in some of the more diverse 



subjects covered In tbe magazine 
at past conferences, so again 
this year we'll have tutorials 
on hardware mods and on Forth. 

There'll be Basic Basic and 
Advanced Basic courses, and aa 
Assembly Language tutorial as 
well. 

Some of the people attending 
as lecturers this year Include 
Johanna V*86< Ron Wright, Jack 
Pricker, John Redmond, Kike Turk 
and John Vltetyn. 

John tf' .ntyn la an axpert on 
MS DOS and especially tha IB* K 
and he will bring us a broad 
range of inforaation for Tandy 
1000 users. 

Other computers will be 
discussed, principally the 06000 
•erles of computers, end of 
course, we'll be ahowlng 

Gold link 042 on Viatel - and 
conputer communications la 
getaral. 

Conference Is a place to aaat 
old friends, to aeet the people 
beM-d the cases 1b the 
oagazinei to learn a lot of new 
information, to see the latest 
Tandy equipment. 

Ve hope you' 11 com. We're 
sure you'll be glad you did. But 
please hurry your booking, 
because accommodation (which is 
not obligatory) and places at 
tbe conference, are both limited 
by the size of the centre. 

The cost Is Increased over 
previous years due entirely to 
the fact that we are doing it in 




Sydney wblch is a good deal aore 
expeDslva than the Gold Coast! 

On the other hand, nany of 
you will save by not having the 
additional travelling expenses 
associated with getting to the 
Gold Coast. 

Ve beve made a genuine error 
in our pricing for the 
conference. 

I had not previously 

concidorad the lxpact of da7 
visitors on conferences as they 
have always been on the Gold 
Coast, basically away froa where 
everyone lives. 

Bow with conference being la 
Sydney, things have changed. 

If you are a day visitor, it 
will cost just £20.00 lor one 
day or S35. 00 for both days per 
head to be at conference. 

Bookings closed on 15th July, 
but because of the price change 
I will accept then right through 
to Confereace tine. 

I'D STILL PREFER YOU TO BOOK. 
Its very difficult to cater for 

people when you don* t know who 
Is coning! 

Ve als to make the conference 
a family affair, and the 

location le a good one for 

people wltt families who are 
less interested in conputers, 
but who would still like to be 
with dad or nun for tbe weekend. 
The family can take a ferry 
trip, go for busb walks, or Just 
laze on the beach, w/bllst you do 
your thing at the conference. 



P.O. BOX 1742, SOUTHPORT. 
QLD. 4215 Phone (075) 39-6177 

Rates 
Accommodated (1) 187,00 

Family of 2, 4 $68.00 - $155.00 
Additional family members $52.00 ea 
Includes supper Friday evening, breakfast 
lunch and dinner on Saturday and breakfast 
and lunch on Sunday plus all accommodation. 



Non Accommodated Rates 



One person 

Sat Evening Meal 



One day 
$20.00 
$12.00 

$32.00 



Two daya 
$35.00 
$12.00 

$47.00 



Additional famil> $31.50 345.50 /person 

Includes morning / afternoon tea and lunch. 



LOCATION :- 

Uniting Church's campsite 
Bundeena NSW 

DATE:- 8th ic 9lh August, 1987 

REGISTER NOW!! 

We can only accept a limited number of 
people this year. DON'T MISS OUT! on a 
top weekend of FUN, FRIENDSHIP and 
LEARNING. 

Name: 

Address: 

Phone: 

No. People attending: 

SPEAK UP! :- Now is your chance to 
suggest your ideas for any tutorials we 
may not have mentioned, (participants 

only). 

Tutorials likely to attend: 

Please find enclosed: 

chq/ money order/ bankcard/vlsa/rnastercard 

Card No 

Signature: 



CADDIE 



16K ECB 
GRAPHICS 

THE GRAPHIC DRAW I KG of the 
1905 CADILLAC was compiled 
using 'LINE RASTER' from 
June's Issue of Australian CaCa 
1936. Vith a few circles and 
paint commands added to eooplote 
the picture. 

To draw CADILLAC I used a 
clear piece of plastic film 
(Clad - Vrap) to draw a tracing 
of the old car, then placing the 
plastic onto the T.V. screen I 
traced around the drawing using 
LI HE MASTER. 

The whole graphic program took 
Just on 20 minutes to make as 
LISE MASTER compiles a Basic 
orogram for you and CSAVEs to 
tape or disk. 

Note ; A snail typing error 
appeared in the printed listing 
of LISE MASTER. Line number 920 
should read . . . 



For tape users you could DEL 
that line as it only checks for 
a disk drive. If you do use the 
LIITE MASTER program and get an 
error for some reason, just type 
GOTO 660. This rcturnc the 
progran to the save menu, 



The Listing: 



IP FK=1 ABTD PEEK(19a> O 
THES 840 
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GOTO 10 

3 SAVE"264:3":ESD'6 

10 REX ************************ 

20 REX * CADDIE (CADILLAC) * 

30 REX * DRAVIHG COMPILED BY * 

40 REX * T0X LEHASE USIHG THE * 

50 REX * GRAPHIC PROGRAM * 

60 REX * - LIITE MASTER - * 

70 REM * AUST. COCO JU1TB 1986 * 

80 REM * VOL. 2, #10 * 

90 REM ************************ 

100 CLEAR 500 

110 PH0DE4;PCLS;SCREEf»l,0 

120 FORZ=lTO 143 



130 READ A,B, 
140 LXilUi-B) 

150 BTSIT 
160 DATA 48, 
170 DATA 46, 
130 DATA 48, 
190 DATA 54, 
200 DATA 96, 
210 DATA 136, 
220 DATA 190, 
230 DATA 192, 
240 DATA 134, 
250 DATA 134, 
260 DATA 134, 
270 DATA 132, 
260 DATA 84, 
200 DATA 82, 
300 DATA 48, 
310 DATA 82, 
320 DATA 52, 
330 DATA 32, 
340 DATA 48, 
350 DATA 52, 
360 DATA 50, 
370 DATA 52, 



by Tom Lehane 

CD 
-(C,D),PSBT 

34, 46, 28 
28, 48, 24 
24, 54. 22 
22. 86, 18 
18, 136, 20 

20, 190, 28 

28, 192, 32 

32, 136, 80 

80, 134. 34 

34, 180, 40 

28, 132, 24 

24, 136, 22 
18, 82, 24 
24, 64, 28 
34, 82, 32 
32, 134, 34 
32, 82, 76 
76. 48, 34 
34, 52, 58 
58, 50, 78 
78, 52, 86 
66, 58, 100 




(■HQBV — 
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9 



IS 



U 



28 



380 DATA 52, 66, 60, 76 
390 DATA 60, 76, 72, 80 
400 DATA 72, 80. 86, 74 
410 DATA S6, 74, 94. 86 
420 DATA 94, 86, 104, 88 
430 DATA 104, 88. 120, 84 
440 DATA 120, 84, 118, 76 
450 DATA 118, 76. 120, 72 
460 DATA 120, 72, 128, 8C 
470 DATA 128, 80, 146, 80 
480 DATA 146, 80. 152. 86 
490 DATA 152, 86, 158, 98 
500 DATA 158, 98, 170, 104 
510 DATA 170, 104, 178, 104 
520 DATA 178, 88, 166, 66 
530 DATA 166. 68, 158, 74 
540 DATA 158, 74, 156, 70 
550 DATA 156, 70, 172, 60 
ZOO DATA 172, GO, 174, 64 
570 DATA 174, 64. 166, 68 
580 DATA 178, 82, 178. 92 
590 DATA 178, 92, 188, 92 
600 DATA 178. 82. 188, 62 
610 DATA 188, 62, 188, 80 
620 DATA 188, 80, 192, 80 
630 DATA 192, 80. 192, 94 
640 DATA 192, 94, 188, 94 
650 DATA 188, 94, 188, 02 
660 DATA 192, 84. 224, 84 
670 DATA 224. 82, 224, 92 
680 DATA 224, 92, 220, 92 
690 DATA 220, 92, 220, 102 
700 DATA 220, 102, 224, 102 
710 DATA 224, 102, 224, 126 
720 DATA 224, 126, 232, 126 
730 DATA 232, 126, 232, 82 
740 DATA 232. 82, 224, 82 
750 DATA 226, 92, 234, 92 
760 DATA 234. 92, 234, 88 
770 DATA 234, 88, 238, 88 
780 DATA 238, 88, 238, 106 
790 DATA 238, 106, 234, 106 
800 DATA 234, 106, 234, 102 
810 DATA 234, 102, 224, 102 
820 DATA 188, 32, 228. 114 
830 DATA 178, 104, 184, 92 
840 DATA 216, 104, 202, 98 
850 DATA 202, 98. 186, 100 
860 DATA 186, 100, 172, 108 
870 DATA 172, 108, 158, 128 
880 DATA 158, 128, 154, 148 
890 DATA 154, 148, 164, 138 
900 DATA 164, 138, 172, 118 
910 DATA 172. 118, 184, 106 
920 DATA 184, 106, 196, 102 

930 DATA 196, 102, 214, 104 

940 DATA 36, 130, 28. 130 
950 DATA 28, 130, 42, 108 
960 DATA 42. 108, 50, 102 
970 DATA 50, 102, 66. 96 
980 DATA 66, 98. 80, 100 
990 DATA 80, 100. 94, 110 
1000 DATA 94, 110, 104, 138 
1010 DATA 104, 138, 100, 144 
1020 DATA 100, 144, 88, 114 

1030 DATA SB, 114, 76, 104 
1040 DATA 76, 104, 64, 104 
1050 DATA 64. 104*. 48, 110 
1060 DATA 48, 110, 36, 130 
1070 DATA 100, 144, 110, 144 
1080 DATA 110. 144, 114, 140 
1090 DATA 114, 140, 104, 140 



11O0 DATA 114, 140, 116, 132 
1110 DATA 116, 132, 120, 128 
1120 DATA 120, 128, 144, 128 
1130 DATA 144, 128, 144. 122 
1140 DATA 144, 122, 160, 122 
1150 DATA 162, 118, 98, 118 
1160 DATA 116, 120, 140, 120 
1170 DATA 140, 120, 140, 126 
1180 DATA 140, 126, 116, 126 
1190 DATA 116. 126, 116, 120 
1200 DATA 96. 112, 114, 112 
1210 DATA 114, 112, 126, 100 
1220 DATA 126, 100, 142, 112 
1230 DATA 142, 112, 154, 112 
1240 DATA 154, 112, 168, 110 
1250 DATA 160, 106, 150, 96 
1260 DATA 150. 96, H4, 66 
1270 DATA 144, 86, 126, 84 
1280 DATA 126. 84, 130, 96 
1290 DATA 130, 96, 144, 106 
1300 DATA 144, 106, 160, 106 
1310 DATA 126, 96, 120, 86 
1320 DATA 116, 90, 106, 94 
1330 DATA 106, 94, 92, 90 
1340 DATA 92, 90, 92, 100 
1350 DATA 92, 100, 100, 108 
1360 DATA 100. 108, 112, 104 
1370 DATA 112, 104, 118, 100 
1380 DATA 118, 92, 116, 90 
1390 DATA 64, 62, 86, 98 
1400 DATA 86, 98. 70, 94 
1410 DATA 70, 94, 62, 94 
1420 DATA 62, 94, 56, 82 
1430 DATA 56, 82, 60. 80 
1440 DATA 60, 80. 66. 82 
1450 DATA 66, 82, 84, 82 
1460 DATA 126, 70, 130, 80 
1470 DATA 222, 118, 216, 118 
1480 DATA 210, 126, 186, 144 
1490 DATA 190, 120, 206, 148 
1500 DATA 212, 136, 182. 134 
1510 DATA 200, 118, 194, 150 
1520 DATA 184, 126, 210, 142 
1530 DATA 72, 152, 60, 120 
1540 DATA 50. 144, 80, 126 
1550 DATA 70, 120, 60, 152 
1GG0 DATA 50, 130, 82, 140 
1570 DATA 176, 96, 174, 100 
1580 DATA 176, 98, 180, 100 



1500 CIRCLE* 197, 134), 25 
1600 CIRCLE* 197, 134>, 17 
1610 CIRCLE* 66, 134), 25 
1620 CIRCLE* 66, 134), 17 
1630 CIRCLE* 118, 96), 4 
1640 CIRCLE* 56, 62), 4 
1650 CIRCLEC 59, 68), 5 
1660 CIRCLE* 63, 74), 3 
1670 CIRCLEC 122, 68), 4 
1680 CIRCLE* 228, 80), 2 
1690 CIRCLEC 196. 134>, 4 

1700 CIRCLE* 55. 134), 4 

1710 PAIHT* 202, 100), 3, 3 

1720 PAIHT* 178, 134). 3, 3 

1730 PAIHTC 44, 136), 3, 3 

1740 PAIHTC 34, 126), 3, 3 

1750 PAIHT* 120, 122), 3. 3 

1760 PAIffTC 148, 102), 3, 3 

1770 PAIHT* 110, 98?,3,3 

1780 PAINT* 76, 86), 3, 3 

1790 PAINT* 60, 74), 3, 3 

1SO0 PAINTC 60, 68), 3, 3 

1810 PAINT* 56. 62), 3, 3 

1820 PAINTC 52, 66), 3, 3 

1830 PAINTC 62, 74), 3, 3 

1840 PAINTC 122, 68), 3,3 

1850 PAINT* 126, 74), 3,3 

1860 REM LETTERS AND NUMBERS 

1870 AX$="EDD4FU6R3D6HL3EU4BUBR3 

I860 A1$= M BDED6RU5BR3 

1890 A6S="BR4L2DLGD3FNU4R3U3HL3P 

DBU5BR3 

1900 A9S-" BRSR3D3H5UFR3U3D4G2LR2 

E2U3BUBR3 

1910 AA*="BDfi5RU6F3D4NL3D2RU5BUB 

R3 

1920 AC$="BDD4RD06R2FBD4GL2B06BR 

6 

1930 AD*="D6EU6R3D6E»U40L3By6BR7 

1940 AU-"D6RU6BR3 

1950 ALS="D6CBU6R2BU6BR3 

1960 DRAV'BHBQ, 180"+ACS+AA*+ ADS+ 

Ali+ALS+ALJUAS+ACS 

1970 DRAVBM140, 1S0"+A1$+A9$+AX» 

+A6$ 

1980 GOTO 1980 



o 
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U)NF'87 

AS V% PREPARING SOME 
material far Sofftgold od 
this June long weekend, 1 
help thinking of Greg and 
all that has happened since his 
death three years ago. 

One of the high points, and I 
mean high, was CoCoConf 86. I 
must admit that getting »way 
from ray five kids for a few days 
had something to do with how I 
felt. 

However, there was more to It 
than that. First otf all, I met 
Graham, Alex and Jin at the 
office, On the Saturday I net a 
lot mere people who had 
prevlojcly only been names in 
the maaasine. 



by Johanna Vagg 

Graham has asked me to come 
and sp^aV scafn. I'll be thPre. 
VI U you? I'd like to meet the 
people who read my articles.. 

You might be able to give me 
some idea of the topics you'd 
like rae to cover. Of course you 
could do that through the mail 
(keep those cards and letters 
coming ... as Dlno used to say), 
but nothing beats meeting the 
people with whom you correspond. 

I was pleased to have met the 
staff at the office - It added 
another dimension to the phone 
calls I've made to them since. 



o 
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the 

GOLDSOFT 




WlSHBOOK 




The Gcldsoft Wlshbook 
The following products are available 

on order from us. 

To order, contact us by phone, Viatel 
or letter, giving your name, address, 
phone number and credit card number, as 
well as the Item shown beside the 
product as listed below, 

All items Include post and packing. 



I ten 4 

G 001 



G 002 



G 003 



G 004 



CoCo Hardware 

Description Frice 

The CoCoConnection - 
0&e your CoCo to 
control models, alarms 
- anything electrical $206.00 
Vldao Amplifier with 
sound - attach your 
CqCq 1 or 2 to a 
Video monitor $35.00 

The Probe - A temper- 
ature sensing unit 
you plugin to the Joy 
stick poi t. $49.95 

64 K Upgrade Kit - up- 
grade your CoCo2's 
memory to 64Kt $55. 00 





CoCo Software 




Item If 


Desci iption 


Price 


C 1001 


Say the Vordz - two 
Curriculum based 
speller programs for 
your Tandy Speech / 






Sound Fack <32K ECB) 


429.95 




The GflCo 3 Tape/Disk 




Item I 




Frice 


G 1002 


* 1 


$16.00 


G 1003 


# 2 


$16-00 


G 1004 


# 3 

The Best of CoCoOz 


$16.00 


Hen # 


Description 


Price 


G 1005 


* I Education 


$16.00 


G 1006 


2 Part 1 &6K Games 


$16,00 


G 1007 


* 2 Fart 2 32K Gamea 


410.00 


G 1008 


$ 3 Utilities 


$16.00 


G 1009 


# 4 Business 


$16.00 


G 1010 


9 5 Adventure Games 


$16.00 


G 1011 


* 6 Preschool Edn 


$16-00 


G 1012 


U 7 Graphics 


$16.00 


G 1013 


* 8 16K Gaines 


$16.00 


G 1014 


19 32K Gave? 


$16.00 



1015 


110 Education 


$10.00 


C 1016 


#11 Education 






(Disk only) 


$16.00 




Tandy and IBM PC Hardware 


I ten 


Descr Iption 


Price 


Q 001 


Colour Monitor 






:DTX 2001) 


$680. 00 


q 002 


Xono Monitor 


$190-00 


Q 003 


House 


$90. 00 


Q 004 


80266 Fpeed Card 


$550.00 




Tandy and IBM PC Software 


Business 




item # 


Description 


Price 


Q 1001 


dBase H 


$1043.00 


Q 1002 


dBase III 


$1470-00 


Q 1003 


Sidekick 


$215.00 


Q 1004 


Turbo Pascal 8037 


$261.00 


Q 1005 


Turbo Pascal BCD & 8087 


$244.00 


Q 1006 


Crosstalk 


$306.00 


Q 1007 


Lotus 123 


$1054.00 


q 1008 


Wordstar 2000+ 


$927.00 


1 2001 


Webster's New World 






Writer 


$249.00 


% 2002 


Webster's Spelling 






Checker 


$89.95 


Z 2003 


Webster's Thesaurus 


$89.95 


2 2004 


Vlndowword 


£209.00 


I 2005 


Ready 


$99. 00 


2 2006 


Thinktank 


$385.00 


CAD Packages 




Item # 


Description 


Price 


2 2007 


TDREOCAD (V 1.4) 


$399 . 00 


Trade Business Fackages 




I torn * 


Descript Ion 


Pi ice 


Z 2008 


The Motor Trade Package 


$99.00 


Z 2009 


The Professional's Pack $99.00 


Z 2010 


The Retailer's Package 


$99 . 00 


Z 2011 


The Rental Package 


$99.00 


Account 


lng 




Item 


Description 


Price 


Z 2012 


Asset Manager 


$1170-. 00 


Z 2013 


Cosh Desk/Finance Desk 


$399-00 


Z 2014 


System 4 


$<H5.00 


Z 2015 


C.P.A. Plus 


1395 , 00 



Databa&es 

Item * Description Price 

Z 3016 0mnus3 IBM-Single user $495.00 

(flulti user versions 

are available) 



Kpreadshee ts 

Item Description 

Z 2017 Logistix 



Price 
$399.00 
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ARISTA RS232 - Female to Female Gender Changer. 



Fun 

Item # Description 

Q 1020 Ancient Art of Var 

1021 Print Shop 

1 022 Gato 

1023 Sargon 111 

1024 Zork I 

1025 Zork II 

1026 Zork III 

1027 Trinity 
Q 1.028 Ballyhoo 

9 1029 Hitch Hicker's Guide 

to the Galaxy 

Q 1030 Crossword Magic 

Q 1031 The American Challenge 

V 1032 Balance of Power 

Q 1033 Racter 

Q 1034 Jet 

Q 1035 Roonmlst 

Q 1036 Shanghai 

Q 1037 Championship Golf 

Q 1038 Borrowed Tine 

Z 2018 The Great International 
Paper Airplane Constru- 
ction hit 

Z 2019 Star Tr<?k 

Z 2020 Championship Boxing 

2 2021 UltliM 11 

Z 2022 Decision In 

Z 2023- F-15 Sti ike 

Z 2024 Kings Quest 

Z 2025 Mean 18 

Z 202G Eoulderdash 

Z 2027 Faulderdash 

Z 2028 Conflict in 

Z 2029 Dambusters 

Z 2030 Kings Quest 

Z 2031 FSI-5 Trading Company 

2 2032 Silo-nt Service 

Z 2033 Solo Flight 

Z 2035 Star FLeet 



the Desert 
Eagle 



II 
Vietnam 



II 



Education 
Item * 
Z 2036 
Z 2037 
Z 2036 
Z 2039 



Inscription 
Chem Lab 
Creature Creator 
Crypto Cube 
Decimal Dungeon 



Price 

$96. 00 
$119.00 
466.00 
$96.00 
S79.00 
$79 . 00 
S79.0G 
179.00 
$79.00 

$79. OC 
$68. 00 
$68.00 
$69. 00 
$79. 00 
1114. 0C 
$79. 00 
$68.00 
$89.00 
168. 00 



$49.95 

$49.95 

$69. 95 

$69.95 

169.95 

169.95 

$69.95 

169.95 

149.95 

149.95 

$69.95 

169.95 

$6-9.95 

$69.95 

169. 95 

169.95 

159.95 



Price 

169.05 
159.95 
159.95 

$49. Q5 




z 


2040 


z 


2041 


z 


2042 


Z 2043 


Z 


2044 


z 


2045 


z 


2046 


2 


2047 


z 


2046 


z 


2049 


z 


2050 


z 


2051 


2 


2052 


z 


2053 



ARISTA DATA SWITCH. 



Item 9 

Q 2001 

G 20Q2 

G 2003 
G 2004 



Item I 
D 001 

D 002 



D 003 



Item t 
G 1017 



G 1010 

G 1019 

G 1020 

C, 1021 



Item ' 
G 005 



G 000 

G 0O7 
G 008 
G 009 



Item * 
A 001 

A 002 

A 003 



Donald Duck's Playground 159.95 
European nations and 

locations $59.95 

Fraction Action $49.95 

Math Maze $59- 95 

Mickey's Space Adventure $69.95 

Mission Algebra $59.95 

Face Car 'Rlthmetlc $49.95 

Remonber! $89.95 

Ships Ahoy $59.95 

Spellagroph $59.95 

Spellakmzam $59.95 

Spell icopter $59.95 

Ten Little Robots $49.95 
Vinnie The Pooh In the 

100 Acre Vpod $69.05 

Miscellaneous Items 

Description Price 

Box of 10 DSDD Disks $19.00 

10 Boxes plus <p«r box) $16.10 

Blank C30 Cassettes $2.00 

12 Cassettes $13.00 

Tape cases, 12 for S5.00 

Help - Manual for CoCo $9.95 

Modems 
Description Frlce 

Manual 1200/75 baud 
plus 300/300 add** $269.00 
IBM Half Card 1200/75 
& 300/300 (Auto dial - 
auto answer) $370.00 

Desktop 1200/75 a 300 
/30O baud aodea iAuto 
dial - auto answer> 1425.00 

Terminal Programs 
Description Price 

CoCoTex - Videotex pac 
(Viatel) for all CoCoe 
On Tape $79.95 

CoCoTex as above on 
disk $79.95 

Vtex 2 - Videotex pac 
for IBM Compatibles $225.00 

Supertex 2 for Amiga a 
Atari 520 ST (specify) $99.95 
Interlink - Videotex 
software for IBM PC's 
and compatibles $94.95 

Hadems/Softwa re/Cable 

Description Price 

CoCoTex with cable and 
manual modem 

(Specify disk or tape) $295.00 
CoCoTex with cable and 

auto dial wden 

(Specify disk or tape> 1451.00 

Interlink with cable 

and manual noden $365.00 

Vtex 2 with half card 

auto modem $555.00 

Vtex 2 with desktop 

auto modea and cable $720.00 

Other Hardware 

Description Price 

Gender Changer - Male 
to Male $12.45 

Gender Changer Female 
to Female $12.75 

RS232 Data Switch with 
Tester $99- 95 



Tandy 

ELE4»TRONiesl 



Color 
Computer 2 
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4%pa • With Comprehensive Tutorial 

^^^■mM*> Manua/s on Extended 64 S/C 

^fcfl ^HH •*** Reg 299.95 . attach fo Your TV for /nstan* Use.' 

Learn to programme, or use ready-to-run soft- basic language! Create drawings, designs, 

ware and SAVE $200! Extended BASIC lets charts and animation. With 256 x 192 screen 

vou write sophisticated programmes and resolution, string arrays of up to 255 

create color graphics with access to 16,000 characters, full featured editing tracing and 

characters of memory and built-in Extend ed so much more! Expands to 64K RAM. »3iae 

Color Computer 2 Software - Most on Sale! 

Cyrus Chess. The perfect chess partner for beginners or pro's! OS-9 Level 1 Programming Languages 

Choose vour level of play. Requires 64KCoCo2only (in ROM Pak). Baslc-09. Produce high-speed object programmes. Requires 64K 

(Clearance). 26-3064 Reg79.95 Sale!39.95 CoCo 2 and disk drive. 26-3036 Reg199.95 Sale!79.95 

Cuthbort In The Mines. Help Cuthbert in his daring escaoe from CCompiler. Produces assembly language source code for the 

the mines. Roq. 1 6K Extended CoCo 2, joysticks (In tape) 6809 microprocessor. Requires 64K CoCo 2 and disk drive 

aa.73,4 Reg29.95 Sale!12.95 awosa Reg179.95 Sale! 79.95 

Draconian 3. A hair-raising space adventure! Req.64K CoCo 2and D.L.Logo. A programming language that can play music and talk! 

joysticks. (In tape). 26-™>o Reg29.95 Sale! 12.95 Requires 64KCoCo 2 and disk drive, ftftw&Reg 149.95 Sale! 79.95 

SpeedRacer.Becomeaformulaoneracingdriver.Pitstopfbrnew Pascal-09. A programming language with enhancements for 

tyres. Requires 64K CoCo 2 and joysticks, (in tape). expanding input/output and the OS-9 operati ng system^ Requires 

2 6. 7362 Reg29.95 Sale!12.95 64KCoCo2ar.ddiskdrlve. 26-3034 Reg179.95 Sale!79.95 

Color Editor Assembler. Requires minimum 16K CoCo 2 and tape (All the above requires 29-3030) 

recorder(in ROM Pak). 26-3250 Reg99.95 Sa!e!49.95 color Computer Sesame Street Educational Tape Software: 

Color Disk Editor Assembler. Requires 16KExtendedCoCo2disk Taxi .Drlvearcundtheworld!26-2509 34.95 

drive.;6-3254 Regii9.95 Sale!59.95 starTrap. Exciting action. 26-2510 3 4 - 95 

Disk ScrlpsH. Requires minimum 16K Extended CoCo 2 and disk Qrover 1 s Number Rover. 26-2S22 39.95 

drive.26-3255 Reg179.95 Sale!99.95 Pea nut Butter Panic. 26-2523 34.95 

Color Profile. Requires minimum 16K Extended CoCo 2 and disk Ernie . s shapes. 26 2524 39.95 

drive.26-3253 Reg99.95 Sale!89.95 B lg Bird Delivery. 2^2525 39.95 

Cookbook Program. An all-purpose menu planner. Requires 64K Cookie's Letter. 26-2526 39.95 

CoCo2 and diskdrive. 26-3257 Reg 79.95 Sale! 39.95 Qrobot. Creative fun. 26-2527 34.95 

SAVE ON OS-9 LEVEL 1 SOFTWARE Timebound. Planetary acti on. 26 2528 - 34.95 

OS-9 Editor Assembler. Requires 64K CoCo 2 and disk drive. Flip Side. Color Invasion. 26-2529 -- 34.95 

2Q-3030 R©fl129.fl5 Sale! 99.95 -some of ih»se ''p« programs may require lovsneks. _^^^_ ^^^^_ 



Color Computer Upgrade 
Kits 

64K Upgrade for 16K Extended CoCo 2. Upgrade your 
existing 16K Extended Color Computer to 64K RAM to 
double your programming power! 26-9*11/12 
Reg 179.95 Sale! 99.95 



Extended BASIC for 1 6K Standard CoCo 2. Upgrade your 
present 16K Standard Computer with advanced 
programming capabilities to create, high-resolution 
color graphics using simple one-line commands. 
Includes PEEK, POKE AND USR commands, multl 
character variable names, string arrays up to 255 
characters, full-featured editing, tracing! Includes 
tutorial manual on Extended BASIC 28-9413/14 
Reg 114.95 Sale! 49.95 



Color Thinline Disk Drive 



CLEARANCE 



Reg 
599.00 




Increase your data storage with a second drive — add 
156KandSAVE$300!156,672charactersofuserstorage 
per diskette. Requires installation (not included). 26-3130 



Second Drive for FD-501 



Save 
$ 220 



CLEARANCE 




FD-501. Allows storage of over 156,000 characters of 
data in color computers with extended BASIC. With 
13.3cm double density, 35 track floppy disk drive and 
more! 26-3129 



Thermal Matrix Printer 
with Graphics 




TP-10. This speedy little printer features an elonga- 
tion mode for expanding print, with a special repeat 
function to make graphics programming so much 
easier! Prints 32 cpl at 30 cps on 10.47cm wide ther- 
mal paper. CoCo compatible serial interface only (600 
baud). 26-12&1 



Computer Cassette Recorder 




Saves your money and your data! Features volume 
control with preset marker. It's idea for loadingand sav* 
ing all your valued programmes. A 'must* for tape- 
based computers. Includes cable. Requires four "AA" 
batteries or AC adapter (not included). 26-1209 



WE SERVICE WHAT WE SELL! 



a division oftandy 
australia limited 
inc in n sw 



Nearly 
350 Stores 
Australia- 
Wide 



Available From 350 Stores 

Australiawide Including 

Tandy Computer Centres 

or Order On VIATEL *64261 4# 

Independent Tandy Dealer* may not t» participating In ihis ad or have every item advertised 
Pncae may also vary al IndrvidueJ Dealer Stores 




Another version of the old 
0*6 a X'6. You have the 
choice of X or 0. X has the 
first play but If you take the 
then the computer will grab 
the first go. If you can beat 

the computer on this one then 
you' re a better nan than I aa 
Gungha Din. It is not a very 
elaborately set out gaae and it 
Is necessary to RUfl to start 
each new game. 

The Listing TICTACTO: 

2 PRINT TAB< 10 5 . "T ICTftC " 

6 PRINT 'PRINT 

10 PRINT "12 3" 

12 PRINT " 4 5 6" 

14 PRINt " 7 8 9* 

16 PRINT < PR I NT 

20 DIM S<9> 

56 INPUT *t>0 YOU WANT *X' OR '0' 



55 IP C*=-X" THEN 475 

68 P*--0" >Qf «"X" 

100 G— 1 >H-1 " IF SC5><>8 THEN 1 e3 

102 SC5>=-1 i GOTO 195 

163 IF S<5><MTHENie6 

184 IF S< I X >8THEN1 18 

185 SU> — 1'G0T0195 

106 IF S<E>-lflHDS< I >-*8THEHI81 

18? IF SC4 )«=1ANDSC1 >>0THEH181 

108 IF SC6>»lflNDSC9>*8TNEN189 

109 IF SC8>=lfiNDSC?>=8THE!U89 

1 10 IF G-1THEH112 

111 G0T0118 

112 J-3*INT<<H-1V3H1 

113 IF 3<INTCCM-1V3>*1*MTHENK=1 

114 IF 3tlNT<(h-t>/3)+2»MTHENK«2 

115 IF 3*INT<<M-1>'3>+3»MTHENK«3 

116 GOTO120 

118-FOR J-1T07STEP3 F0ftK=lT03 

L3E- IF SC J>OGTHEN130 

122 IF S< J+2X>GTHEN133 

126 IF S< J+l )<>0THEN158 

128 SC J*l >»-l'GOT019S 

138 IF S< J>=HTHEN156 

131 IF &<J42)OGTHEN15e 

132 IF SXJ+iX>GTHEN15e 

133 S(J>"-1'GOT0195 



135 IF St J*2)O0TMEN158 

136 IF S< J+l ><>GTHEN1S8 
138 SCJ*2)=*I :G0T0195 
158 IF S<K)OGTHEN16e 
152 IF S<K*6X>GTHEN163 
156 IF S<K+3>O0THEN170 
158 SCK+3>— 1 'G0T0195 

160 IF S<K>-HTHEH1?0 

161 IF S(K+6>OGTHEH170 

162 IF S<K+3>OGTHENI78 

163 SCK>=-1 'G0T0195 

165 IF S<K+6>O0THEN170 

166 IF S<K+3>OGTH£N178 
168 SCK+6)«-I 'G0T0195 

170 GOTO450 

171 IF S<3>=GfiH0S<7)-8THEN187 

172 IF SO>»GfiNE>SC 1 J-0THEN181 

173 IF $<7)=GANDS<3)«0THEN193 

174 IF S<9>»0flNDS< 1 3-GTHEN189 

175 IF G=-1THEHC-1 'H=-l GOTOl 18 

176 IF SO>-lflHt>S<3>-BTHENie2 

177 FOR t«2T09'IF S< I ><>8THEN179 

178 SCI )=-l 'C0T0195 

179 NEXT I 

181 $Cl>s~PGOT0193 

182 IF Si 1 >«1THEN177 

183 SC3)=-1 -G0T0I95 
187 SC7>»-1 -G0T0I95 
189 SC9)»-1 

195 PRINT 'PRINT-THE COMPUTER HOV 

ES TO..." 

262 GOSU9I0G01 

205 GOTO500 

458 IF G=UHEN463 

455 IF J*7flNOK=3THEN465 

468 NEXTK,J 

465 IF SC5>«=GTHEN1?1 

467 GOTOl 75 

475 P*=-X- <Q*""0" 

588 PRINT INPUT-WHERE DO YOU HOV 

E?" jH 

582 IF H=0THENPRINT-THRHKS FOR T 

HE GAME" G0T0288e 

503 IF rt>9THEN5©6 

565 IF S<ri>-eTHEH51B" 

506 PRINT-THftT SGURRE IS 0CCUP1E 

D" 'PRINT. PRIHT ' GOTO580 

518 G = l S<H>-1 

528 Gosusieee 

530 GOTOl 08 

1088 PRIHT 'FORI* 1T09'PRINT* "i'l 

F SO )<)-lTHEN1914 

1012 PRINT 0»" " j 'GOTO1020 

1014 IF S(IX>eTHEN1618 

1016 PRIMT" ";;G0TO1828 

1018 PRIHT Pf" *'| 

102© IF r<>3ftN[>K>6THEHiese 

1030 PRIHT'PRINT' ♦ + 

1048 G0101689 

1058 IF E-9THEH1088 

1060 PftINTM"j 

1660 NEXT I 'PRJHT'PRINT PRINT 

1095 FOR I»1707$TEP3 

1100 IF SC 1 ><>:« 1 + 1 >THEN1115 

1105 IF S<IX>S< I+2MHENU13 

1110 IF SC I >— 1THEN1350 

1112 IF SCI >=1THEH1288 

1115 NEXT I i FOR I»1T03' IF SC I ><> 

S< 1+3)THEN1156 

1130 IF SCDOSC l+6>THEH115fl 

1135 IF SC I >»-lTHEN1350 

1137 IF SCI)»lTHEM12ee 

1130 NEXT It FOR I=1T09'IF SC I >-8 

THEH11SS 

1 152 NEXT I =GOTO1400 

1135 IF SC5X>GTHEN1170 

1168 IF SC 1 >"GfiH0SC9>»GTHEN118e 

1165 IF SC3>»GflHDSC7>-GTHEHU80 

1 178 RETURN 

1188 IF G— 1THEH1338 

1260 PRIHT-YOU BEAT ME I GOOD GRM 

E-'GOTO2000 

1358 PRINT" I UIN,TURKEY!"<GQT028 

80 

1400 PRINT B 1T'S fl DRflH. THRHK YO 

U" 

2088 END 

O 



34 



.-.'.£ 






PULSAR 
BLAST 



by Barry Hanford 






arry coverted this program 
for the HC-10 from the 
original for the CoCo by 
jH. Forde. To operate you use the 
larrow keys to move the sights 
land the space bar to fire the 
jmisslles. Bote that the arrow 
key-s have to be held down when 
movinR the sights. You have to 
be Quick when you are playing 
Ithis one. 



The Listing; 



jia cls 

t'0 PP1MT"PULSRR BLAST 1 
©0 FRIHT"E:Y M.FORDE" 

PRIWTTONVERTEti BY B-W.HflNFOR 
m PRINTFOR THE MC-16" 

15 PRIMTe232."ftNY KEY TO STfHRT"; 
m F0PT = 1T05 F0RFMTOZ55STEP45 S 

iUHDF, 1 -HEXTF NEXTT 

;.0 1FIMKEY1=""THEN60 
|?0 CLS6 FORO=lTOiee0:HEXT 

":0 111 = I €-1 

{90 SP=OU=511 '1=496 
[108 ft=RNCK 50D >+5 

1 19 M!"H1+RHDC£3 

120 CLS 

132 CFV*RHPO* 

13S lFCFV=lTHEHH*="C-8->" 

134 IFCFV-STHEHW*»"<*0->" 

135 1FCFV=3THEHH*="I»-*I " 

136 EP = ER+PI1DC3) 

|l40 PR I HT& 255-32+ 16-2. "-"> PRINT 
•255-32+16+2."-"; 
Il.ee PRIHTtflj* "; 

[170 IFFEEK< 16346 >=254THEHfl=Ft-l 
B71 IFPEEK< 1694r> = 247FHEHR = l=l+32 



172 IFPEEKC IS948 >=251THENfl=fi+l 


386 PRINTR239j" ";D=239 


173 IFPEEKC 16952 >=251THENA=R-32 


390 FORK«1TO10 T=RND<4) 


17*4 &*»IMKEYS 


408 1FT = 1TMEHD=[V-1 


175 IFC"*=" "THEH340 


40! IFT=2THJEHD = t»+l 


ISO 2=RND<20 >-SP 


402 IFT~3THEMD=t>-32 


1S*0 tFSP>l6TH6HZ-RN0^43 


403 lFT = 1THEHL>=D+32 


tm IFZ=nHEHfl = ft-32 


410 PRIHT6[>,CHR*(RHD< lZ8) + 126>i 


201 IFZ=2THEHfi=A+32 


430 1FRM0(35=1THEHD=239 


202 JF2=3THEMn«ft-l 


440 NEXTK 


203 IFZ=4THEHA=ft+l 


442 F0RGH=1 TQ20 ' SOUNDRHDC 36)* 1 -Hi 


210 IFFKlTHEHfl=l 


EXTGH 


211 lFft>502THENft-5e£ 


450 £P=SP+1 =PRIHTe0, "RUSH TO URV I 


220 PRINT 81 , M HISSLES="MI; 


E ";SP;" ! 1 ! "; FORX-1TO1000HEXT f: 


225 pRiMTeaa. "ec-0PE="<ep*5 >*vb 


460 IFG*=" "THEM470 GOTO<1€© \] 


226 PRlHTe46e. "LEVEL" jSPj 


•470 GOTOieO 


250 1FMK lTHEH4&e 


IB© FORGH J= 1 T04& i C LSRHtK 9 >- 1 i SOU I 


240 PRlHTQft.H*; 


IDRHD<255>, 1 -NEXTGHJ 


25P 1F[>F-1OORRM[><20 XMTHEN275 


499 PRINT"YGUR SCORE IS-" 


260 M=ft 


508 PRIHT<SP*5 >+VB 


261 SOUND 1.1 iSOUHDlie.l S:CilJ*lt>200 


510 PRINT'PRIHT'PRIHT-fiHDTHER GO I 


■ 1 


<Y/H>" 


265 CLsSft-ER aFCL<2eTHEWCU»B8 


515 fl$=INKEY* 1FA» = " ,, THEN515 


270 DF = 10 


516 IFR*="V"THEHRUN 


275 PRINTiHi " " >- < IFt>F=10THEN280 


517 END 


£76 IFt>FO10THEH34e 


326 PR1HTC2S5-32-M6.-X"; jj 


£80 IFPEEKC 16946>=254THENM=M-1 


521 U-U-32-2 '1=1-32+2 


281 IFFEEKC 16947>-247THENM*M+32 


522 PRIHTe255-32+J6, " " ; 


282 IFPEEKt 1 6948 )=251 THENM-M+t 


525 PRIHT<*U.CHR*<92>; -pRlNTei,CH 1 


283 IFPEEK< 1 6952 >=251 THENH=M-32 


R$(47)i P 


290 IFIK 1THENM=1 


530 RETURN W 


295 IFM>5i0THENM-510 


700 IFA+2=255-32+16THEH380 >j 


300 PRINT?! 1 !. "*" J 


710 IFM=255-32+16THEN3000 


310 CL=CL-1 


720 RETURN 


315 PRIHTS51 1-10. "T IHER»"CL> 


1000 REM 


320 REM 


1010 FCiRG=lT04 S0UND1, 1 'SOUHO200 


330 1FCK1THEH480 


. 1 ' NEXTG ' VB«VB-+RND< 3 ) 


348 ifos=" °THENU»5lW*4a8>HI** 


1020 REM 


I-l 'FCiRT=255TOlSTEP-30 -G0SUB52Q 


1030 DF=0 


S0UNDT.1 :PRINTI?U." " ; " PRIKT6I , " 


1035 M«H j 


"j 'NEXT G0SUB7M 


1040 GOTO140 


358 GOTQHfl 


; 


360 PRrnefl^Ht; 




32K ECB ADVENTURE 

Editors Note: Cver the past 
few months we have had a few 
programs that were unprintable 
due tn thefr length Bvt because 
we have chanxe-d our policy 
regarding printing larxe 

programs In magazines, we have 
decided to re-print those lew 

programs which never made it. 

These programs will be 

reproduced, text and all in this 
month's magazine & tape/disk. 

QUEST IS A dungeon and 
dragon style adventure 
Rane wbere you. the 
adventurer must destroy the evil 
nngician. To do this you must 
fight evil monsters, collect 
various items and unravel the 
mysteries of the dungeon. 

Quest requires 32K ECB. If a 
cassette is used the Line 
should "be omitted as it is only 
required for a disk system. The 

first tine the Drcffran is run 

with a disk system present will 
result in an FC error, but will 



by Andrew McLintock 

run correctly the second time. 

Quest has full Instructions, 
so Rood luck adventurer . . . 
you' 11 need it! 



The Listing: 

0QTC1O 

1 'QUEST — AHDREV MCLUTOCK 

2 SAVE"QUEST:3":END 
10 FILES 

20 REM *fSETTING UP** 

30 DIM V$(5),C$(4)»AJ(3:' 1 KJ(G) I H 

(6> l KS(6,5),HS<6),CR(G) i KD(6) 

40 L4=STRIJGS<31,45) 

50 FOR X=l TO 6:CR(X)=0;MD(X)=2: 

NEXTX 

60 IF OH>0 THEN 80 

70 50SUB 4350 

80 3=RND<20)*RSD<35)+RF}<40>: IF 

GOO THEN 80 

90 R*<l l 2)= ,, LAHP ,, :HC=RSD(6>:R*a 

1 l) = M(MC):M(n=H(MC) 

100 R$C2,2)="RIBG":MC=MD(6):R$< 
2 I 1>=K*€HC):M<2) = H<HC> 

110 R$(3 1 2)="KEY":MORKD(6)!RJ(3 

,1>=HS(MC):H(3)=K£KC> 

120 Rt<4.2>="KA0lC 3V0ED" ; HC=RHD 



(6):R$(4.1) = K$(MC>:M(4)=H<KC) 
130 R$(5,2)= ,, STAFF":RJ(5 l 3)="POT 
I OH": W>FND<6>:R$<5,1>-HS(HC):HC 

140 R$(6 1 1)="KAG!CIAR ,, :K<6)=20:R 

t<0,l>="»OHE." 

150 Xl = l r 3:Yl=100:AC=0:Cl=32:AA=0 

:E$=STR[KGJ<31,32):C3=0:C5=64:PH 

=2:R$U,0>="2":R$(2,0>="2''':Et<3, 

p)="2 M : R*U, 0>="2" : RS (5, 0>*"3" : R 

$(6,0)="1" 

100 C=R1TD(4> :S=RUD<12) + 3: l=PHDU 

2H3;D=RlIDU2)+3 

170 IF C=l THEN HF=RHD<4>*3 ELSE 

IF OS OR C=3-THE» HP=RND<Ot2 
ELSE IF 04 THEN HP=RHD<3>+BHD(3 
) 

180 JF HF-0 THEN 170 ELSE COO 
190 IF QH>0 THEH HP=HP-t-0H 
200 0H=HF;G0T0 730 
210 CLSiFRIlTTSll, "—QUEST—" 
220 PRtn©32,' * ARMOUR" :FRIHT<!47," 
A. C" : PSIBM55, "COST" 
230 FOR X=l TO 3:C1=CU32 
240 PFIST5C1..X" "AJ <X> 
250 rR!8r<?ClU l 5,X*3 
2G0 HEXTX 

270 FRIHTe3& l '*'5O":FRlHT«120 1 "40" 
: PR IHTm 52, "20" 

280 FRINT<?192, "WEAPONS" :FRliTTi?20 
VDAKAGE";FRIKT<?214,"COST M 
290 Cl=192 

300 FOR X-l TO 5t 0=01*32 
310 FRINT@C1,X" "VS(X> 
320 IF X=l THEN 02=4 ELSE IF X=2 

OR X=2THEff C2-G ELSE IF 1*4 OR 

X=5 THEM C2-8 
330 FRIRTGCH15.C2 
340 WEXTX 

350 PR I ST'?247 , " 5" : F R I NTS279 , " 1 0" 
rPXIBTMll/MO" 

360 FRIST (!343 1 "15":PRIHT'?375 I "2 
0" 

370 PRIKT<?384, ,, C0L[>="G 
380 PRIMT84L6, M aRMOUR/wEAF08S/eH 
D 11 
390 GOSUB15O0 

400 FRINTP416.B4 

410 PRIHT^ie.-ITEM NUMBER" 

420 IF I$="V THEH D80 ELSE IF 1 

$-"E" THEH &90 

430 IF AA=1 THEH 380 

440 AA=1 

450 G0SUB1660 

460 K'VftL<I*>: IF H> 3 THEH AA'0:G 

OTO 380 

470 PRINT Ai(N> 

480 C3-C3U 

490 H$(C3>=AI(N) 

500 G4=G 

510 IF H=l THEH G=G-G0: AC=4 

520 IF N=2 TKES G=G-40:AC=5 

530 IF H=3 THEH G=G-20: AC=6 

540 IF G"-0 THEHFRIHT«9416 t B*:PRIH 

T(?416,"Y0U DON'T HAVE EHOUGH GOL 

D":FOR X=l TO 700: HEXTX: C3=C3~1 

550 IF IS="1" AMD G<0 THEH AA-0 

560 IF G<0 THEH G^G4 

570 GOTO 370 

5B0 GOSUB1060 

500 H1=VAL<I«>: IF Bl>5 THEH 410 
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600 IP C3=0 THEH PRlHT«4ie,"YOU 

MUST SOY ARMOUR FIRST': FOE X=l T 

700: HEXTX: GOTO 370 

610 C3=C3+1 

620 IF C3>5 TKEH C3=C3-1: FRIHT'Y 

OU CAH'T CARRY MORE VEAPOtfS" : FOR 

X=l TO 700: HEXTX: GOTO 380 
630 PR1HT V$(H1) 
640 SJ<C3>=V*Cfl) 
650 G4=G 

660 IF 11=1 THEH G=G~5 ELSE IF H 
1=2 THEI G=G-10 

670 IF Hl=3 THEH G=G-10 ELSE IF 
11=4 THEH G=G-15 ELSE IF 111=5 TH 
BH 0=G-20 
680 GOTO 540 

690 IF S<6 THEI HP=HP-1 ELSE IF 
S>6 THEH H?=HP+1 ELSE IF S=6 THE 
H HP=HP 
700 OR=HP 

710 IF I<6 THEI Il=-1 ELSE IF I> 
6 THEI 11=1 ELSE IF 1=6 THEI 11= 


720 IF D<6 THEI AC=AC+1 ELSE IF 
D>6 THEH AC=AC-1 ELSE IF D=6 THE 
H AC=AC 

730 CLS:C4=320 
740 PBIBT«11 1 "**CLAS3**" 
750 PSIHT665, "CLASS; "CS<C>:PRIH 
T533,"H.P:"HP 
760 PRIHT«44,"A.C:"AC 
770 P£1HT<?97,"STREHGTH:"S 
780 PRIHT$129,"IHTELLIGBHCE: M I 
790 PEIHT$161 ( "DEXT£RITY:"D:PRIH 
TLS 

800 IF COO THEH 830 
810 G0SU61660 

820 CC=CC+1: IF CC=1 THEH 210 
830 FHHT0235,"** ARMOUR**" 
840 PBIHTG256, HS<1> 
850 PR1HTG299,"** ITEMS**" 
860 FOR X=2 TO C3 
870 PR1HT«C4.H*<X> 
880 C4=C4+32 

890 HEXTX: FRIHT&148,"G0LD:"G 
900 G0SUB1660 
910 IF CC>2 THEH RETURH 
920 REM **HAP«* 

930 PH1HTC 448 ."PRESS <EITER> TO 
SEE HAP":CCC=1 
940 G0SUB1660 

950 PXODE 4,1:SCREEH 1,1:PCLS 
960 LIME(35,n0)-(55,125),PSBT ( B 
970 LIHEC30,135>-<60, 155),PSET,B 
980 L1IE(75 1 U0)-(85,U0),PSET,B 
990 LIHE(155,140>-U75,155>,PSET 
,B 

10O0 LIHBU85, 110>-<215,135>,PSE 
T.B 

1010 FOR X=A TO 20 STEP 5 
1020 CIRCLEQ30,130> ( X,5, .5 
1030 IEXTXaiIE(Xl,Yl)-ai+5,Yl» 
5),PSET,BF 

1040 LIHB(40 ) 125)-(40,135),PSET 
1050 LIRE(55,120)-C75,120> I FSET 
1060 LIHE(85,115)-(100,115),PSET 
1070 LSHE<60,145)-C100,U5) I PSET 
10&0 LtHEaOO, 115>-(100,145),PSE 
T 

1090 LtHEQOO, 130)-<115, 130) , PSE 
T 
1100 LfHE(145 t 130>-U60,130),PSB 



1110 LIHEU60.140)-(160,120),FSE 
T 

1120 LIIE(160,120)-(185,120),PSE 
T 

1130 LI5EaO,90>-(245,lSO>,PSET. 
B:GOSUB4510 
1140 GOSUB1660 

1150 IF CCC=1 THEH 1910 ELSE RET 
URH 

1160 REM WOMBAT ROUT HE** 
1170 MH=M<R):C6=1 
1180 C5-64:CR<R)=1:IF MD(R)=0 TH 
EH C8=0:C6=0:PRIHr , THERB , S H0T8I 
HG TO FIGHT,": FOR 1=1 TO 700: IBX 
TX: RETURH 
1190 CLS 

1200 PRIHT«12,"*C0HBAT*" 
1210 PRIHT(549,"HIT POIHTS:"HP 
1220 PRirre32,"nEIIS:"j 
1230 PRIHTG192,L$ 
1240 FOR X=2 TO C3 
1250 PRIHT^C5,HSa) 
1260 C5-=C5+32:8EXTI 
1270 IF C6<>1 THEH 1460 
1280 PRIHTff224. "BITES VEAPOH I.D 
HUKBER" 

1290 G0SUB1GGQ 

1300 VC=VAL(IS> 

1310 IF VC>5 THEH 1280 

1320 FOR X=2 TO C3 

1330 IF HS(X)=V$<VC) THE! 1360 

1340 HEXTX 

1350 GOTO 1280 

1360 IF VC=1 THEH VD=RIDCfl> 

1370 IP VC=2 OR VC=3 THEH VD=RID 

(6) 

1380 IF VC=4 OR VC=5 THEH VD=RBD 

<8) 

1390 PR I HT8 256, "YOU ATTACK" 

1400 T=RHD(20)+I1: IF T<13 THEI 1 

450 

1410 PR1HTS288,"AHD HIT !!" 

1420 KH=MH-VD:IF MH>0 THEH 1440 

ELSE PRIHTS352."Y0U KILLED THE " 

Rt<R.l>:MD(R)=l:C6=0:IF UB-1 TffR 

H HP=0H 

1430 Ii=IHK£Y$:IF I*=""THEH 1430 

ELSE RETURH 
1440 PRIHT(2320 1 "YOU DID"VD"POIIT 
S OF DAMAGE" : GOTO 1460 
1450 PRIHT(5288 1 "B0T MISS" 
1460 PRIITff352*"THE "RS(R,1>" AT 
TACKS" 

1470 T=RHDC20)+MH: IF T<RHD(3)+14 
-AC THEH 1510 

1480 PRIHT9384,"AHD HITS YOU U" 
1490 MD=RHD(2):HP=HP-KD: IP HP<1 
THEH PR1MT$416,"Y0U HAVE LOST AL 
L OF YOUR HIT POIHTS.THB MOBSTER 

HAS KILLED YOU."j:FOR X=l TO 11 
00: HEXTX; GOTO 4210 
1500 PRISTS416,"YOU LOOSE "MD" H 
IT P0IITS":GOTO 1520 
1510 PR1»T5384, ,, BUT MISSED YOU" 
1520 PRIHT3448,"DO TOU VAST TO r 
UH OR flGHr" 
1530 GOSUB1660 

1540 IF 1»="F" THE! C8=i:G0T0 11 
80 

1550 IF IIO"R" THEH 1520 
1560 C6=RHD<3>: IF C6=l THEH 1580 



1570 PR1HT«448,"Y0U FAILED TO EV 
ADE THE MOHSTER":FOR X=l TO 700: 
HEXTX: GOTO 1180 

1580 PR1HT<S448,"Y0U HAVE EVADIED 
THE M0HSTER":C6=1;F0R X=l TO 70 
0: HEXTX: RETURH 

1590 CLS:PRIHTR1S:PRIHT$24,"H.P: 
"HP 

1600 PRIW»33,RS 
1610 PRIHTL*:FRIHTOS; 
1620 F0RX=1T0VAL(RS(R,0)):FRIHTR 
S(R 1 I);:PRIHT" "; 
1630 HEXTX: PRIHT:PRIITLi: PRIHTDS 
;:PRIHTF2*:PRIHTLS 
1640 IF C6=l THEH OH R GOTO2180, 
2360,2020,2810,3240,3420 
1650 I HPUT"COKHAHD"; CIS: RETURH 
1660 IS=IHKEY*; IFi*=""THEH1660EL 
SERETURH 

1670 REM **GEHERAL COHMAHDS** 

1680 C0S=LEFTS(CIS,2):CD*=LEFT$( 

CIS,4):C8=0:CD1=VAL(CIS>:CD1=LEH 
<CIt) 

1690 IP CO*="Fl"THEH GOSUB 1160: 
GOTO 1890 

1700 IF CRCR>=0 THEI PRINT"YOU K 
UST FIGHT THE MOBSTER. ": FOR 1=1 
TO 700: HEXTX: GOTO 1890 
1710 IF CO»="HA"THEH GOSUB 950:G 
OTO 1890 

1720 IF CO$="R'J"THEH C6=1:G0T0 1 
890 

1730 IF CO*="IH" THBH CC=3: GOSUB 

730: GOTO 1890 
1740 IF CDS="TABL"THEH GOSUB 512 
0:GOTO 1890 
1750 IF CD$=" DROP" THEH GOTO 1760 

ELSE C8=1:G0TO 1890 
1760 DU=RICHtt<CI*,CDl-5> 
1770 IF DI$=AS(1) OR DU=A$(2> 
R DU=A*(3> THEH PRIHT"YOU CAH'T 

DROP ARMOUR": FOR X=l TO 700: HEX 
TX:GOTO 1890 
1780 FOR X=2 TO C3 
1790 IF DI$=IS(X) THEH DI^I:GOT0 

1810 
1800 HEXTX: PRIHP'YOU DOH'T HAVE 
A M DI$:F0R X=l TO 700: HEXTX: GOTO 

1690 

1810 FOR X=DI TO C3-1 

1820 H*<X>=HS<X+1> 

1830 HEXTX 

1840 H»(X)="":C3=C3-1 

1850 IF DU="RIHG" THEIPRIHT"BEC 

AUSE YOU DROPED THE RIHG YOUR A. 

C DECREASES. ":AC=ACU:F0RX=lTO70 

0: HEXTX 

1860 IF DU="HAG1C SVORD" THEHPR 

IHT"YOU LOSE OHE H. P BECAUSE YOU 

DROPED THE SVORD. ":HP=HP-1: FOR 
X=1T0700; HEXTX; IF HP<1 THEH 4290 
1870 V=VAL(RS(R,0>>:V=V+1 
1880 RS<R,V)=DIS:RS(R,0)=STR$<V) 
1890 RETURN 

1900 REM **RO0H SET UP** 
1910 CCC=2:S*="I CAH'T CARRY ABY 

MORE" 
1920 Oi=" ITEMS: ":DS="D1RECTI0HS: 
•t 

1930 GOTO2050 

1940 IFC3<5THEF1950ELSEPRFHTS»:G 
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S="":GOTO1970 

L950 FORX=1TOVAL<RS(R,0>): IFGS=R 

* <R, X>THENGi=X: GOT01990 

1960 NEXTX; PRINT" I CAN' T GET THA 

T, IT'S NOT HERE." 

1970 IS^IHKEYS;1FIS=""THEN1970£L 

SEK9=1 

1980 RETURN 

1990 IF DN=OANDG$=RS<R, UTHE5PR1 

NT"! CAN'T GET A MOBSTER" l GOTO 19 

70 

2000 C3=C3+1:NS(C3)=GS 

2010 FOR X=GI TO VAL(RS(R, 0))-l: 

R*(R,X)=RS(R,X+1):»EXTX 

2020 RETURN 

2030 F0RX=1T0VAL<R*IR,0>>-1 

2040 RSCR ( X>=RS(R t XU>:NEXTX:RET 

URN 

2050 RE!* **R00K 1** 
2060 C6=0: Xl=40: Yl=il5 : R=l ; Rl*=" 
ENTRANCE" I R2S=" SOUTH; EAST" : RS="Y 
OU ARE STANDING AT THE BOTTOM OF 
SOKE STAIRS. THE WALLS ARE KA 
DE OF ROCK, THERE IS A DOOR IH TH 
E BAST CORNER." 
2070 GOSUB1590 

208O GOSUB 1680: IF C6=l THEN 207 
ELSE IF HD(R>=1 THEN 2240 ELSE 

IF CflOl THEN 2070 
2090 IF CIS="0PEN DOOR" THEN C7= 
l:GOTO 207O 

2100 IF Cl£O"G0 DOOR" THEN 2120 
ELSE IF C7=l THEN 2460 ELSE IF 
C7<>1 THEN PRINT" THE DOOR IS CLO 
SED." 
2110 1S=IHKEYS:IF IS=""THEH 2110 

ELSE 2070 
2120 IF CDS="GET "THEN GS=RIGHTS 
(CI$,CDl-4> ELSE 2190 
2130 GOSUB1940:IFG1="LAKP ,, THEHC9 

= 1 

2140 IFK9OlTHEN2l60ELSEK9=0 

2150 GOTO2070 

2160 RS <R. X>="" : V1=VAL<RS <R, ) ) I 

V1=V1-1:RS<R,0>=STBS(V1> 

2170 OOTO 2070 

2130 IF C6<>1 THEN 2190 ELSE INP 

UT"VHICH DIRECTION"; IS:CDS=LEFTS 

(IS ,4) 

2190 IF CD*="SOUT" THEN 2270 

2200 IF CD$= H EASr OR CDS="HQRr 
OR CDS="VEST" THEK PR I NT" YOU CA 

JTT GO THAT VAY":F0R X=l TO 700: 

NEXTX: IFC6O1THEH2070 

2210 IFC.6=1THEH2180 

2220 IF CDS="LOOK" THEN 2070 

2230 PRINT"! DON'T UNDERSTAND. "C 

IS; GOTO 2110 

2240 GOSUB2030 

2250 HD(1)=0:GOTO 2160 

2260 REM **ROQM 2*» 

2270 C6=0:X1=40:Y1=140:R=2:R1S=" 

GREAT HALL" : R2S=" NORTH; EAST" : RS= 

"YOU ARE IN A LARGE HALL, THERE 

ARE OLD TABLES AND CHAIRS PLACED 
ALONG THE WALLS." 

2230 GOSUB1590 

2290 GOSUB 1630: IF C5=l THEN 228 

ELSE IF M)(R)=1 THEN 2430 ELSE 
IF C801 THEN 2280 

2300 IF CDS="GET "THEN G*=RIGHTS 
(Crs,CDl-4> ELSE 2370 



2310 GOSUB1940: IFGS="R1HG" THEHP 

RIHT'THE RING INPOVES YOU A.C":A 

C=AC- 1: FORC1=1T0700: NEXTC1 

2320 IFK9OlTHEH234QELSEK9=0 

2330 GOSOB2280 

2340 RS <R, !)■"" ! V1=VAL CR* (R, 0) ) : 

V1=V1-1:RS(R,0) = STRS(V1) 

2350 GOTO 2280 

2360 IF C6<>1 THEN 2370 ELSE 1HP 

DT-VHICH DIRECTION"; 1$: CDS-LEFTS 

US.4) 

2370 IF CDS="EAST" THEN 3740 
2360 IF CD$="N0RT" THEN 2060 
2390 IF CDS="S0UT" OR CDS="VEST" 
TBBH PRINT" YOU CAN'T GO THAT DI 
RECIIOH":FOR X=l TO 700:NEXTX: IF 

C6<>1 THEN 2280 
2400 IFC6=1THEN2360 

2410 IF CD*="LOOK" THEN 2280 

2420 PRINT "I DON'T UNDERSTAND " 

CIS:G0SUB1970:GOTO 2280 

2430 GOSUB2030 

2440 HD<2)=0:GOTO 2340 

2450 REKttROOH 3** 

2460 FOR X=L TO C3: IF H1(X)="LAM 

P" THEN C9=l 

2470 NEXTX 

2480 C6-0rXl=77:Yl=120;P=3rR2i=" 

EAST; VEST" 

2490 CLS: PR INT" SECRET PASSAGE" ; R 
=3 

2500 PRINT®24/*H.P:"HP 
2510 IF C901 THEH 2540 ELSE PRI 
NT<?33,"YOU ARE !N A LOHG.THIN PA 
SSAGE WITH GREED SLIME COVERISG 
THE WALLS. THERE IS AHOTHER PAS 
SAGE AT THE OTHER END.': GOTO 25 
20 

2520 GOSUB1610 
2530 IF C6=l THEN 2620 
2540 IF C9=0 AND CIS="VSST" THEH 
2060 ELSE IF C9=0 THEN PRINT" I 
T'S TOO DARK TOO SEE.YOJ FALL AN 

D BREAK YOUR NECK": FOR X*l TO 10 

00:NEXTX:GOTO 4210 

2550 GOSUB 1680: IF C6=l THEN 249 

ELSE IF MD(R)=1 THEN 2690 ELSE 
IF C801 THEN 2490 

2560 IF CDS="GET " THEN GS=RIGHT 

S<Cl$,CDl-4> ELSE 2G30 

2570 GOSUB1940: IFGS="KEY" THEIK1 

= 1 

2560 IFK9OlTHEH2600ELSEX9=0 

2590 GOSUB2490 

2600 RS <R, X>="" : V1=VAL <R* CR, 0> > : 

V1=V1-1:RSCR,0>=STRSCV1) 

2610 GOTO 2490 

2620 IF C6<>1 THEN 263C ELSE INP 
UT"VHICH DIRECTION"; Ifi:CDS=LEFTS 
CIS.4) 

2630 IF CDS="VEST" THE* 2060 
2640 IF CD*="EAST" THEH 3620 
2650 IF CDS="HORT" OR CDS="SOUT" 
THEN PRINT"YQV CAN'T GO THAT DI 
RECTI0H";FOR X-l TO 700: NEXTX: IF 

G5<>1 THEE 2490 
2650 IFC6=1THES2620 
2670 IF CD**" LOOK" THE* 2490 
26S0 PRINT" I DON'T UNDERSTAND "C 
IS:GOSUB1970:GOTO 2490 
2690 GOSUB2030 
2700 HD(3)=0:GOTO 2600 



2710 REK**R0OH 4** 

2720 C6^0:X1-130:Y1=130:R=4:RH= 

"LAKE" : R2S="EAST ; VEST" : RS="T0U A 

RE STANDING ON THE EDGE OF A CRY 

STAL CLEAR LAKE. THERE IS A 3WOR 

D IN THE MIDDLE OF THE LAKE." 

2730 GO5UB1590 

2740 GOSUB 1680: IF C6=l THEN 273 

ELSE IF HD<R)=1 THEN 2880 ELSE 

IF C801 THEN 2730 
2750 IF CDS="GET " THEN GS-RIGHT 
$(CIS,CD-4> ELSE 2820 
2760 G0SUB1940: IFGS="KAGIC SVORD 
"THEH PKINT"THE SVORD HAS GIVES 
YOU 1 EXTRA H.P":HP=HP+l:FOSCl=i 
TO70O:NEXTCl 

2770 IFK901THEH2790ELSEK9=0 
2780 G0TO2730 

2790 R$(P,X>^'"iVl^VAL(RS(R,0)>: 
V1=V1-1:R»(R,0)=STRSCV1> 
2800 GOTO 2730 

2810 IF C6<>1 THEN 2820 ELSE INP 
0T"VHICH DIRECTOIN" ; IS; CDS=LEFTS 

(IS,4> 

2820 IF CDS="EAST" THEN 3980 

2830 IF CDS="VEST" THEB 3860 
2840 IF CD$="NORT" OR CDS="S0UT" 
THEN PR I NT" YOU CAN'T GO THAT DI 

HECT10N":FOR X=l TO 70O:NEX?X: IF 
C601 THEN 2730 

2850 IFC6=1THEN2810 

2860 IF CD*= ,, LOOK" THEH 2730 

2870 PRINT" I DON'T UNDERSTAND n C 

IS:GGSUB1970:G0T0 2730 

2880 G03UB2030 

2890 HD<4)=0:G0T0 2790 

2900 REM **R0OM 5** 

2910 C6=0:X1=160:Y1=145:CLS 

2920 K1=0:FOR X=l TO C3: IF NSCC3 

)="KEY"THEH Kl=l 

2930 NEXTX 

2940 PRINT"THERE IS A CLOSED DOO 

F" 

2950 INPUT"COHKAND";CIS 

2960 IF CIS=" NORTH" THEH 39B0 
2970 IF CIS="0PEN DOOR" THEN PRI 
HT"THK DOOR IS LOCKED." I GOTO 295 



2980 IF CIS="UNLOCK DOOR" AND Kl 

=1 THEF 3010 ELSE IF CIS="UHLOCK 

DOOR" AND KlOl THEN PRIHT"YOU 
DON'T HAVE A KEY" 
2990 GOTO 2950 

3000 FOR X=*l TO 70O: NEXTX: GOTO 3 
980 

3010 R=5:R1*-"SPELL ROOM" : F2S="H 

ORTH":RS="YOU ARE STADING IH A R 

OOM FULL OF OLD BOTTLES. THERE IS 

A POTION AND A STAFF OH A OLD T 

ABLE." 

3020 G0SUB1590 

3030 GOSUB 1680: IF C6=l THEN 302 

ELSE IF HD(RW THEN 3300 ELSE 
IF C801 THEN 3020 

3040 IF CDS="GET "THEN GS=RIGHTS 

CCIS,CD-4> ELSE 3250 

3050 IFC3+l>6THENPRIHTSS:G0TO309 



3060 FOR X=l TO VAL<R*<R,0>> 

3070 IF GS=RS(R,X> THEN GI=X;GQT 

3100 

3080 NEXT X: PR I NT" t CAH'T GET THA 
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T, IT'S IOT HERE." 

3090 IS=IIKEYS:IF I5=""THEH 3090 

ELSE 3020 
3100 IP DX=0 AID CS=RS<R,1> THEI 

PRIir'I CAI'T GET A KOHSTER" : GO 
TO 3090 

3110 IF GS="POTIOI" THE* K2=RID< 
3> ELSE 3150 
3120 IF 12=1 THBI 3150 
3130 IF K2=3 THEB PRIIT'THE POTI 
01 VAS POSIOI.YOU LOOSE 2 HIT PO 
IITS.":HP=HP~2:IF HP>0 THEI 3160 

ELSE FOR X=l TO 700: IEXTX: 12=1: 
GOTO 4210 

3140 PRIST" IT VAS A HEALIHG POTI 
01. YOU GET 4 HIT POUTS." :HP=HP+ 
4:I2=l:GOTO 3160 
3150 IF GS="STAFP' THEI FRUIT" IT 
'S A STAFF OF LIGHTING BOLT, BUT 
IT OUT HAS ORE CHARGE.": K3=l 
3160 GOSUB1660 
3170 C3=C3U 
3180 I4(C3>=GS 

3190 FOR X=GI TO VAL<RS(R, 0>J-1 
3200 RS(R,X>=RS<R,X+1> 
3210 IEXTX 

3320 RS(R, X>="": V1 = VALCR»(R, 0) ) : 
V1=V1-1: RS <R, 0>=STRS CV1> 
3230 GOTO 3020 

3240 IF C6<>1 THEH 3250 ELSE IIP 
OT" WHICH DIRECTION ; IS: CDS=LEFTS 
(11,4) 

3250 IF CDS="BORT" THEI 3560 
3260 IF CD*="SOUr' OR CDS="EAST" 

OR CD*="VBST" THEI PR I IT" YOU CA 
I'lGO THAT DIRECTION ": FOR X=l 
TO 700; IEXTX: IF COOX THBI 3020 
3270 IFC6=1THEI3240 
3280 IF CDS="LOOK" THEI 3020 
3290 PHUT" I DOI'T UIDERSTAID "C 
IS: GOTO 3090 
3300 COSUB2030 
3310 KD(5)=0:GOTO 3220 
3320 REK * *ROOH 6** 
3330 C6=0:R=6:R1S="THROIB ROOK": 
R2S-" VEST" ;R*-" YOU ARE IB A KAGI 
IFICAIT THROIE ROOM. THERE IS A 
EVIL XAGICIAI 01 A GOLDEI THROIE 
. <<YOU KUST KILL THE HAGICIAI) 
>.'• 

3340 GOSUB1590 

3350 F0RX=1T0C3: IFIS(C3>="STAFF" 
THEIK3*=1: IEXTX 

3360 IFCIS="USB STAFF"ORCIS="FIR 
E STAPF"AIDK3=1 THHI3370BLSB3390 
3370 IFK4=1 THEH3400ELSEH(6>*X<6 
)-10:K4=2:PRIHT"YOU HIT THE MAGI 
CIAI A*P HE LOST 10 HIT POUTS"; 
IFK<6>< 1THEKF0RX= 1TO700: IEITX: GO 
TO4270 

3380 PRIST"THE STAFF HAS LOST AL 
L IT'S CHARGES. ":K4=1:GOT034 10 
3390 GOSUB 1680: IF C6=l TEES 334 
BLSB TF KD(R)=1 THEI 3470 ELSE 

IF C8<>! THEI 3340 
3400 PR I IT" THE STAFF HAS 10 CHAR 
GES LEFT. ".GOTO 3.410 
3410 IS=IHKEYS:IF IS=""THEI3410B 
LSE3340 

3420 IF C6<>! THEH 3430 ELSE ISP 
UT"VHICH DIRECTION; I S:CDS=LEFTS 
CI*, 4) 



3430 IF Cr*="VEST" THEI 4100 
3440 IF CDi="IORT" OR CD*= ,, SOUT" 

OR CDt="EAST" THEI PR I IT* YOU CA 
FT 00 THAT DIRECTIOr':FOR X=l T 
7O0:IEXTX:IF C6<>1 THEI 3340 
3450 IFC6=1THEI3340 
3460 PRliri DOI'T UIDERSTAID "; 
CIS: GOTO 3410 
3470 GOSUB2030 

3480 KD<6>=0:RS<R,X)="":V1=VALCR 
S(R,0)):V1=V1-1:RS(R,0)=STRS(V1) 
:GOT042B0 

3490 REK **IITERSECTIOI COXXAIDS 
** 

3500 COS=LBFTS<CIS,2):C8=0:CM=L 
EFT4CC1S.4) 
3510 IF CQS="II" THBI CC=3; GOSUB 

730: GOTO 3590 
3520 IF C0*="KA"THEI PRIIT'IT'S 
TOO DARK TO READ THE MAP.": GOTO 
3600 

3530 IF C0*="FI" THBI PRIIT"TKER 
E IS IOTHIIG TO FIGHT. ":GOTO 360 


3540 IF C0*="B«" THEI PR I IT" T HER 
E IS XOTHIHG TO RUI FROX.":GOTO 
3600 

3550 IF COS="GE" THEB PRIIP'THER 
E IS IOTHIHG TO GET HERB.": GOTO 
3600 
3560 IF CCS=»DR" THEH PRIST" IF I 

DROP THAT I WILL LOOSE IT.": GOT 
3600 

3570 IF CCS="TA" THEI GOSUB 5120 
:GOTO 3590 
35S0 C8=l 
3590 RETURI 
3600 IS=IIKEYS;IF IS=""THBI 36D0 

ELSE RETURH 
3610 REK **IITERSECTIOI 1** 
3620 CR=0: R=0: R1S="PASSAGE" : R2»= 
"SOUTHiVEST^RS^'YOU HAVE COKE T 
A BEID II THE PASSAGE." 
3630 GOSUB1590 

3640 GOSUB 3500: IF C8<>1 THBI 36 
30 

3650 IF CDS="VEST" THEI 2460 
3660 IF CDS="SOUT" THBI 3860 
3670 IF CDS="IORT" OR CDS="BASr 

THEI PRIBT"YOO CAI'T GO THAT DI 
RECTIOI" ELSE 3700 
3680 FOR X=L TO 700:IBXTX 
3690 GOTO 3630 

3700 IF CDi="LOOK" THBI 3630 
3710 PRUT" I DOI'T UIDERSTAID "C 
IS 

3720 GOTO 3630 
3730 REK WITERSBCTIOI 2** 
3740 CR=0:R=0:R1S="PASSAGE":R2S= 
"NORTH; VEST" :RS="YOU ARE AT A BE 
ID. THERE IS A IDISE TO THE K)R 
TH." 

3750 GOSUB1590 

3760 GOSUB 3500: IF C8<>1 THEI 37 
50 

3770 IF CDS="VBST" THEI 2270 
3780 IF CDS="XORT" THBI 3860 
3790 IF CD*="SOUT" OR CDS="EAST" 

THEI FRIIT"Y0U CAI'T GO THAT DI 
RECTIOff'ELSB 3820 
3800 FOR X=l TO 700: HEXTX 
3810 GOTO 3750 



3820 IF CD*="LOOK" THBI 3750 

3830 PRUT" I DOI'T UIDERSTAID "C 

IS 

3840 GOTO 3800 

3350 REK »*IITERSECTIOH 3** 

3860 CR=0:R=0:R1S="PASSAGE":R2S= 

M IORTH ; SOUTH; EAST ;R*=" YOU ARB S 

TAIDIIG AT A ROCK ' T' IITERSBCTI 

01." 

3870 GOSUB1590 

3880 GOSUB 3500: IF C801 THE! 38 

70 

3890 IF CDS="K>RT" THEI 3620 

3900 IF CDS =" SOUr' THBI 3740 

3910 IF CDS="EAST" THEI 2720 

3920 IF CDS =" WEST" THBI PRIIT"YO 

U CAI'T GO THAT DIRECT 101." ELSE 

3940 
3930 FOR X=l TO 700: IEXTX: GOTO 3 
870 

3940 IF CDS="LOOK" THEI 3870 
3950 PRIST" I DOI'T UIDERSTAID "C 
IS 

3960 GOTO 3930 
3970 REM MIITERSECTIOI 4i» 
3980 CR=0:R=0:R1S="PASSAGE":R2S*= 
"IORTH;SQUTH;VEST";RS="YQtf ARE I 
I A DIKILY LIT IITERSECTI 

OB ALOIG THE PASSAGE." 
3990 GOSUB1590 

4000 GOSUB 3500: IF C801 THEH 44 


4010 IF CDS="HORT" THEI 4100 
4020 IF CD*= M SOUT" THE! 2910 
4030 IF CDS="VEST" THEI 2720 
4040 IF CDS="EASr THEI PRUT* TO 
U CAI'T GO THAT DIRECTIOI." ELSE 

4060 
4050 FOR X=l TO 700: IEXTX: GOTO 3 
990 

4060 IF CDS="LOOK" THEI 3990 
4070 PRUT" I DOI'T UIDERSTAID "C 
IS 

4080 GOTO 4050 
4090 RSH **IITBRBSCTIOI 5** 
4100 CR=0:R=0:R1*="PASSAGR" : R2$= 
" SOUTH; EAST" ;R*=" THE PASSAGE TUR 
IS HERE. THE WALLS ARE VERY S 

KOOTH." 

4110 GOSUB 1590 
4120 GOSUB 3500 
4130 IF C801 THEI 4110 
4140 IF CDS="SOUT" THEB 3980 
4150 IF CDS **' EAST" THEI 3330 
4160 IF CD»=' , IORT w OR CD*="VEST" 

THEI PPIHT"YCU CAI'T GO THAT DI 
RBCTIOI." ELSE 4180 
4170 FOR X=l 10 700: IEXTX: GOTO 4 
110 

4180 IF CDS="LOOK" THEI 4110 
4190 PR I IT" I DOI'T UIDERSTAID "C 
IS:GOTO 4170 

4200 REX **DEATH ROUTIIE** 
4210 CLS:PRin<8353."YOU HAVE BEE 
I KILLED III YOUR QUEST. YOU HAV 
E FAILED II YOUR 'QUEST' FOR A 
DVESTURE," 

4220 FOR X=138 TO 148' 
4230 PRIHT9X,"-":IEXTI 
4240 FOR X^15 TO 335 STEP 32 
4250 PRUT ex,"!"; -.IEXTX 
4260 OH=O:GOT0 4330 
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4270 SEX **VICTORY BOUTIBE** 

4280 CLSrFOR X=42 TO 52 

4290 PRIFT5X,"-":KEXrX 

4300 FOR X=15 TO 303 STEP 32 

4310 PR1HT«X,"V";:BEXTX 

4320 PR1FT<?321,"YOU HAVE SURVIVE 

D THE DVBGEGH AID KILLED THE HA 

GICIAH.YOUR ARB VICTORIOUS IH YO 

OR ' QUEST' . you won. . - " I LE=2 

4330 PRIHTS448," PLAY AGAIH CY/H 

>";:GOS0B1660 

4340 IF IS=' f H" THEH EHD ELSE IF 

1%="T' THEH 40 ELSE 4330 

4350 PMODE 4,1:SCREEI 1,1:PCLS 

4360 L1HEU2B,100>-(128,190),PSE 

T: LIKE- (123, 100), PSET 

4370 LIHE(133,100>-U28,190>,PSE 

T;LIHEU00.100>-U5G, 100), PSET 

4380 LISE(lO0,95>-(156»95),PSET 

4390 FOR X=100 TO 159 STEP 7:CIR 

CLE(X,97),3:NEXTX 

4400 L1HE<123,95>-U24 I 54),PSET: 

lr|XB <133, 95>- <132, 54) , PSET 

4410 CIRCLE(128.54>,4 

4420 LIHE(70,54)-(30,54>,PSET:Ll 

BE-(20,112),FSET 

4430 LISE-<3Q,i9Q\?3ET;Ll5E<70, 

54>-(80, 112), PSET 

4440 L15E- (70, 190), PSET: LINE- <30 

,190), PSET 

4450 LISE<50,64>M50.180>,FSET:L 

IHEC30, 100)-C7O, 100), PSET 

4460 LIHE<226,54)-(186,54>,PSET: 

LIKE- (176, 112), PSET 

4470 LIBE-(136, 190), PSET 

4430 LI WE (226, 54) -(236, 112), PSET 

:LISE-(226, 190>,PSEr 

4490 LIKE- (186, 190), FSET;LIHE<20 

6,64>-(206, 180), PSET 

4500 LIHE(226,100)-(186,100),PSE 

T 

4510 LIKE(20,5)-(50 1 45),PSET,B:L 

IBB <55,49>-<45,40>, PSET: LIHB<65, 

5)-<65,45),PSET 

4520 LIKE- C95, 45), PSET: LIRE- (95, 

5), PSET 

4530 LIME(140,5)-(110 I 5),PSET:LI 

BE-<110,45),PSET 

4540 LIUE-C140 ( 45>,PSET:LIHE(110 

,25>-(140,25),FSET 

4550 LIliE(185,5)-(155,5) 1 PSET:LI 

HE-<155,25>,FSET 

4560 LIBE C185.25>,PSET:LIHE-(18 

5, 45), PSET 

4570 LIBE-<155.45),PSET:LIBE(200 

,5)-(230,5).PSET 

4580 L1BE(215,5)-(215,45),PSET 

4590 IF CCOOTHEHRETURB 

4600 REM t*DATA ARRAYS** 

4610 DATA DAGGER, BATTLE AXE, MACE 

, CROSS BOV.SVOKD 

4620 DATA FIGHTER. ELF. DVARF.CLER 

IC 

4630 DATA PLATE MA1L.CHAIH HAIL, 

LEATHER 

4640 DATA GHOUL. CAIBT SPIDER, BUG 

BEAR, KOEOLD, ORC, OGRE 

4650 DATA 6,6,6,8. 10,12 

4060 FOR X=l TO 5: EBAD V*(X):HEX 

TX 

4070 FOR X=l TO 4: READ CI (X) : HEX 

TX 



4680 FOR X=l TO 3:READ AS(X):BEX 

TX 

4690 FOR X=l TO 6: READ MS (X): HEX 

TX 

4700 FOR X=l TO 6: READ M(X):HEXT 

X 

4710 COS'JB1660 

4720 REM UIHSTRUCTIOH PAGES:*-* 

4730 QS=" --QUEST--": PS=" PRESS <E 

BTER> TO COHTIHUE" 

4740 CLS;PRIFT©43,Q* 

4750 PRINT®110,"BY"rPRIBT®168,"a 

ndrew mcllntock" 

4760 PR I HT5296," 26/4/85 - 10/5/8 

6":PRIHT©232,"REQUIRES 32K ECB. " 

4770 FRINT0320.LS: IF LOO THEH L 

=2 ELSE IHPUT'LEVEL <1/2>";LE 

4780 IF LE<1 OR LE>2 THEH4770 

4790 IBPUT" IBSTRUCTIONS <Y/H>"; 1 

$ 

4800 IF Ii= M B" THEH GOTO432 ELS 

E IF lSO"Y" THEH 4790 

4610 GOSUB 4830 

4820 RETURB 

4830 CLS:PRISTGll,Qt;PRira34,"V 

ELCOHE ADVEBTURER.TO YOUR QUE 

ST. YOUR QUEST FOR ADVEHT3RE, POV 

EE.GOLD AND ULORY. YOU HAVE BEE 

H GIVEN A QUEST OH THE I3LAHD OF 
A HIDHIGHT DEATH." 

4640 PRIHT" YOU MUST FIGHT MOHST 
ERS.FIHD MAGIC ITEMS AHD DESTR 

OY AH EVIL MAGICIAH.THE KIIG OF 
DARKNESS." 
4850 PRIBT: PR1HT PS 
486C GOSUB1660 

487C CLS;PRIHT<$11,QS;FRIHT«34 1 "B 
EFOPE YOU SET OUT OB YOUR QUE 

ST YOU MUST FIRST BUY YCUR VEA 
POHS AHD ARMOUR. YOU VILL BE GIV 
EH AH AMOUHT OF GOLD TO BUY THE 
SE ITEMS, YOU CAH'T EXCEED THI 
S AHOUHT." 

4880 PRIST" THE BETTER THE VEAPO 
BS THE MORE DAMAGE THEY VILL DO 
. THE BETTER THE APROUP THE LESS 
DAMAGE YOU VILL TAKE." 
4390 PRIBT: PRIHT PS 
4900 GOSUB1660 
4910 CLSiFRIHT 811, QS 
4920 PRIHT$>34»"THE COMPUTER VILL 
ALSO GIVE YOU OTHER PIECES OF 
IR?DMATIOH. YOU VILL BE GIVEH Y 
OUR STREHGTH, IBTELLIGEBCE, DEXTER 
ITY AHD CLASS. THESE VILL ALL AFF 
ECT YOUR ABILITIES (SEE TABL 

ES>." 

4933 PRIHT:PRIHT PS 
4940 GOSUB1660 

4950 CLS;PRIHT<H1,Q*;FRINT®34,"Y 
OU VILL ALSO BE GIVEH HIT POI 

BTS (H.P) ABD AH ARMOUR CLASS (A 
.O.THE MORE HIT POIHTS YOU HAV 
E THE BETTER. YOU LOSE HIT POI 
BTS IH COMBAT AHD WHEH YOU GET 
HURT. WHEH YOUR H!T POIHTS ARE 
AT ZERO YOU ARE DEAD*!." 
4960 PRIHT: PRIBT PS 
4970 GOSUB1660 
4980 CLS.-PRIHTffll.Q* 
4990 PRIHTQ34," ARMOUR CLASS IS T 
HE STREHGTH OF YOUR ARMOUR. THE 



LOVER YOUR ARMOUR CLASS THE BE 
TTER.THE DAMAGE OF A VEAFOH 

IS SHOVH IH HIT POIHTS (SEE TABL 
ESJ.VHEH IH COMBAT THE COMPUTER 
VILL ASK FOR A NUMBER, THIS IS T 
HE VEAPOS I.D HUMBER." 
5000 PRI8T: PRIBT PS 
5010 GOS'JB16&0 
5020 CLS;PRIHT<$11,Q$:PRIHT$34,"M 

ONSTERS ALSO HAVE HIT POIHTS (SE 
E TABLES). THE HIGHER THE HIT POI 
BTS THE HARDER THE MONSTER IS TO 

KILL." 
5030 PRIHT"THE COMPUTER VILL ALS 
ASK YOU FOR A LEVEL. IH LEVEL 

OBE YOUR HIT POI BTS ARE RESTO 
RED AFTER COMEAT, VITH LEVEL T 

VO THEY'RE BOT." 
5040 PRIBT; PRIHT PS 
5050 GOSUB1660 
5060 CLS:PRIHTU11,QS 
5070 PRIHT«534."VHEH THE GAME STA 
RTS YOU VILL F1HD YOURSELF AT TH 
E EHTRAfiCE OF THE DUBGEOB.YOU KU 
ST FIGHT THE MOBSTERS.F1BD MAGIC 
ITEMS ABD DESTROY THE MAGICIA 
B. 

5080 PRIHT" IF YOU KILL THE MAGI 
CIAB THEH YOU VILL AQUIRE BORE 
HIT POIHTS BUT YOU VILL HAVE TO 
FLAY OB LEVEL TVO. THERE IS AL 
SO A OPTIOH OF A RAP TO HELP YOU 

FIHD YOUR VAY." 
5090 PRIKT"GOOD LUCK!!" 
5100 PRIHT:PRIHT PS 
5110 GOSUB16G0 
5120 CLS:PRIHT«11,QS;PRIHT 
5130 FR1BT"CLASS : ":PRIHT<&6Q,"HIT 

POIHTS:" :K7=82 
5140 FOB X=1T04; IF X=l THEH K6=l 
2 ELSE IF X-2 OR X=3 THEH Ke=8 E 
LSE IF 1=4 THEH K6=G 
5150 K7=K7+32:PRIHTC»a):PRIHT(5K 
7, "4 -"K6:HEXTX 

5160 PRIHT: PRIHT" ARMOUR: ":PRIKT<3 
270. "A. C: " : PRIHT0277 , "COST • ■ 
5170 K6=20;K7=270:K8=277 
5180 FOR X=lT03:K7=K7*32:K8-K8+3 
2 

5190 PRIBT A*(X>:PRIHT(?K7,X^3:PR 
IBT5K8.K6 

5200 K6=K6»20;HEXTX: PRIHT 
5210 PRIHT PS 
5220 GQ3UB1O60 
5230 CLS:PRIHT<311,QS:PRIHT 
5240 PRIHT"ADJUSTMEHTS:":PR[HT"S 
TREHGTH- <6 -1H.P" 
5250 PRIHT(?138, M =6 HO CHAHGE" : PR 
IBTG170, ">6 +1H.P" 
5260 PRIBT" LHTELLIGEHCE- <6 -1 T 
HIT":PRIHTS238,"=6 HO CHAHGE": 
PRIHT(5270,">6 +1 TO HIT" 
5270 PRIHT"DEXTERITY- <6 -1 TO A 
.C H :rRIHT®331,"=6 HO CHAHCE'iPRI 
HT(?3r>3, M >6 tl TO A.C" 
5280 PRIHT: PRIST PS 
5290 G0SUB1660 
5300 CLS:PRIBT®11,QS 
5310 PRIHT ,, VEAPOH:";PR1HT&43,"CO 
ST: " : PRLHTIS50, " DAMAGE: » ! FRIHT1559 
a "I.D;" 

continued on page 43 
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AMBO 



GRAPHICS by Dennis Mellican 



RAHBO IS A graphics display 
(which t hope con be 
entered Into -the next 
"Quick on the Draw Competition". 
This was created by the use of 
"ZocmQT'\ believe it or else! 

The BASIC program came from 
" Maxcomp" (which appeared in 
Australian Rainbow, Oct, 1986). 

P.S. if you don't 
face, re-arrange 
"2oon»r". 



like 
It 



Rambo's 
with 



The Listing: 



RAHBO 
BY DEBHIS KELLICAN 
PICTURE COMPRESSED 
BY KAXCOMP <AUST. 
RA1NB0V.0CT- ,1985) 
BY AFT FLEXSER AHD 
KIKE WARD. 



1 
2 

3 
4 

S 
6 
7 

8 

9 

10 CLS:CLEAR200,S«H7F00:GOTO33 

11 PKiairPRIBfHII 'S' 10 SAVE P 
ICTl'FE AS A";FRINT"BiflAEY FILE" 

12 S=6:E=&H1D: IF PEEK<*HC0O0>=aH 
44 THEH D=l:S=S+8:E=E+8 

13 POKE&H7FFC,S:P0KE4H7FFD,0:FOK 
E&H7FFE, E: FOKE1H7FFF, 4HFF 

14 FORI=&H7F00 T0&H7FB7;READ 
POKE I,VAL("&H"+H$>:BEXT 



15 DATA EC.SD.O.FA.Sa.O.lF.ED.SD 
,O.AF,A3,8D,0,ED,43,50,5C 

16 DATA ED.SD.O.SE.lA.SO.TF.rF.D 
ZiSEtM.SQ.G, 10,8E,80,0,86 

17 DATA B,A7 l 8C,3A,3e,6, A7.8C.34 
,fl6 ( 80 l 80,30,45 ( 48,4fi»59,6A 

18 DATA 8C,29,27 I E,6A,8C,25,26,F 
4.E7.A0,C6,8.E7,8C.1C.20,EB 

19 DATA 86,6,A7,8C r 14.A6,80,26.A 
,A6,4 ( 81,22,2G,C,30,5.A6 

20 DATA 80,30,30,48,48,20,09,0,0 
,3E,80,0, 10,AE,8D,0,91,AG 

21 DATA 80,A7,SC.48,6F,8C,4e,A6, 
80.A1.8C, 40, 20, F, EG, 80, AG, 80, A7 

22 DATA A4,3D I 15,8D ( 23,5A,2e,F7, 
20,4,A7,A4,8D, A,8D,ie,27,E2 1 7F 

23 DATA FF,DE,1C,AF I 39 I 10,AC,8D I 
0,1E,24,4,3LA8,20,39,31,A9,E8 

24 DATA 21,39,SD,8C,F.26,B, ID, AC 
,8C,4B,26 ( 3,6C,8C,4,1A,4,39 

25 PM0DE4:PCLS1:SCREEBU1:READZ: 
EXEC3iH7FO0:CLS 

26 P=PEEK<&H15S):iF P<>251 THEF 
26 

27 IFD THEH PRIHTG64," (DEFAULT E 
XTENSION IS /HAX)":PRl5T©0,""i 

28 LlilElSPUr-FILtHARE FOR Pl^TUK 
E: ";Ft;lFF$=""THEN 27 

29 F=IHSTR(FS, ":">: 1FP>2 TH£S FS 
=KID$ (FS, P+l)+": "+LEFTJ (F$. P-l) 

AND 1HSTR(F$,'V">=0 AHD I 







SSTR(Ft 1 ".">=0THEK Ft-FS-TVKAX" 

31 IFD THEH SAVE* FS.aHEQO, 256t< 
B+1)-1,&HA027.EMD 

32 CSAVEH F$,&H600,256k(E+l)-l.» 
HA027:EHT> 

33 PCLEAR 4:G0T011 

34 DATA1 

35 "1 ;ooo;ooo8>ookno 85o?knlZgo 
n 30-<67Sclo?o840oDoOglo313Po?: 

36 "XollOOOOho koookoCIcG: JO8600" 
00?;Hoo09o gnOCdM0HF]EEf no ubgJ 

37 "sbL lf77S'10?o::ookno? kmoO km 
oOlFBolPIolQKo ao;40kbFOono?Son 

38 "?kmoO gkmnoOgob;ola3n?-lV od 
fcKijlL?[laaknlPGooOShn?30oOkl 

39 "n?chl??b2annh?39'83*n?S*n?kb 
laomKSi?10cb4?ono gmoOVgl09Eook 

40 "no chn?3QiiloooonH?0(5<SS3bl<&2 
O-83b3J?3h'>3P*<3bl83b2P010-L77a 

41 "1100001=C[coooORn EjIEJSf?10 
kblOono kUHemKKbHHG=VO>3b< ono 

42 "oono cblQ3blH3Qh>3blL2QlPC<U 
FB01PLO®020POOOP803008e007b3P< 1 

43 "O0021Q0O3731O gknoLR!PH0~<3? 
l?kaoomo gcaoaolh<«AlPH0X-3FL>S 

44 "OXOOOO?8flooknookno?S'h>34^ei 
Ob<20P?89004 11PD00OS702XD2O03S1 

45 "no0gonfrRUB:7Do?anKlfk i~10?o 
SAoot J ; UE: =D3 E2PD10^411PH0O- <3P 

46 "h>o *800F02O<?810P000<3nookbl 
uo3~7b4 03bG?o7 , -L000010P820lQ80 

47 "Of5nooSfooooo ooooi 10G\g9c\0 
rei?rL30502?oaaginO7il0 a!0 dn 

48 "ER G7?o8=oo okao oolmZUFXEJX 
GleenoOkmo p.oanM?7Rrao?o85ooSQRQ 

49 "D:=JlG;eDZGBXQ0H10Z Gb2?mnlP 
I01QWnQ-;0fX>nG0?ol7ghL Vb*G;alo 

50 u [^le?VooL8oH;oono85ocmO«Ea?I 
KbngBrkll?RnookHS93Xn>Sdm?3ll>S fc 

51 "h>C-J=3i?h42PD:QEZeL F GPe4ZZ 
EJYEta8>o'0ReFtM0o84okrao eL2l06 

52 M 3Gko"bl0oneRVb3^3b7?loc«I,K307 
b4P3nraV20I<lSKclo?al?Af?ho917PG 

53 "OnOn oono>0:E:Q4ZUBXDJYD*8 
lQVRlGdnSLJraRXP3mo gnoGcnoGblol 

54 "PAoEjJEj FXMKi0RT4BZE:Un Gb3 
?10:UF~go84oocjmlnoM?3hlPG-h=BX 

55 "T4RD0 8',0?3QogloOonoGgio; v l? 
l 4 <3008GO?85h=2Fd:S«j?2XD: 1EZ'3 

56 "<T: 10bSd;20000$: 10XD21«\U2FT 
YFioooglEL?l?Ogob40nio[a>U®XVFoo 

57 "FZE:YEZUG3eokooomIlD*eooh02W 
FX0o34ochE2QDRlO8L0?8aoglo?al07 

58 "o863alOirH?7al01PDoOoooOMlX 
^G j mnwoaoraoSn; " n?Smj FP3 XOc 1 1Q; a 

59 "o oZI*BYASlQh'52XD:Q0Xl£!3b:KD 
j^Shn?P00:YEh koo klnOf E: eOb200 

60 "H>73PlQ4 01U?o?en?XEBZmOkooF0 
Sokh^DjglooicolPWaoOfabYGc^JGJX^ 

61 '•; X(?ZXF1QD00I ] DX50FTDS7AJ0«® 
3bl0011PX08?8=0?9Hoam7Xd49H:2eo 

62 M ?goEjVno 000 851>2XE80DX52PD 
0020@5DZ0«31?8<00410 H <7ri?gmob 

63 ,, 1020o?n01PH00kfflQ0gl0r?b4~3b 

GOmoTdn^Eo i l?-riP\OP43FD000081 
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MAILING 

LABELS 



BUSINESS 



T 



HIS PROGRAK DOES not save 
nanes or addres5es t "so 
what does It do?" , ?ou 
niitht ask. 

Veil It Just prints address 
stickers. Vhen you first run the 
proKraa, it asks you for: 

1: Naae 

2: Address 

3: Town 

4: Postcode 

Then It prints the label on 
the screen and asks you if It is 
correct. If it is, it sends It 
to the printer, then it aeks you 
if you want to: 

* Print A*ain 

* Hew Label 

* Quit 

And that's it! 



The Listing: 

G0T01Q 

1 *********** MAILING LABELS *** 

****** JASON ZAAL *********** 
3 SAVB"239:3";END' 3 
10 'KALI SCREEN 
20 CLS3:P0KE359 t 57:SCRBEH 0,1 
30 POKE 25495,1 

40 PRIHT«256.CHR*<i28>;:PRIBT«22 
4,CHR$a28);:PRINTCl92,CHR4(128> 
;:PRIIT«16O,CBRS(120>;:PR1IT«12S 
, CHR* (128 > ; : PBIIT«96, CHRS (128) ; : 
PRIST»64,CHRSC12e> 
50 PRIHT«228,CHRS<128); 
60 PRIIT«320,CHRS(12B);:PRIIM35 
2,CHRSa28>;:PRirt$384 ) CHR*<128> 
;:PRINT«4i6,CHRiU28)i:PRINT§448 
,CHRSU28>j:PRIJT®480,CHR$<128>; 



any CoCo 



by Jason Zaal 



70 FORT= 18T029 : SET <3, T, 1) : SEXT 
80 PRIIiT«95 ( CHR»<128)iiFRIHT*l27 
,CHES(12fl);:PRIlT*159,CER*<128); 
:PR!liTei91.CHRJ(128);:PEIITe223, 
CHRS<i28);:PRirrS255,CHE»(128>i 
90 FOTRT=3TC359:SBT(T,30 I 1):ME1T 
110 FORT = 17TO30:SET(61,T,l>:!fEXT 

120 PRI»T*2e6,"by H ; 
130 PRINT«318,CHR$<12S>;:PFIBTCH 
RSC128); 

160 PRirr<8U4, ,, z"+CHR!<128> 
170 PRlHT«446,"a M +CHRS<:28> 
180 PRIIT«478,"fl"+CHR$<128) 
190 PRIHT®510,"1"+CHR»<128> 
200 PRIJT«0,CHR$C128);*CHR5(128) 
;KaRS(128);+CH5$(l28);+CHR$<l28 
>;+CHR*C128>;+"BaiUnK M ;+CHR*a2 
8> ; t" label" ; +CHR* ( 128) ; +" prolan 
» ; +CHRS C 1283 ; +CHRS <128) . +CHRS C12 
8> ; fCHR»<128) ; +CHRS U28> ; 
210 PRIITfi481,CHR$<128>;+CHR*U2 
6) ; +" copyright" ; +CHR$ (128? j +CHR* 
< 1 23 > ; +CHR* 199 ) ; +CHR* (125 ) ; +CHR» 
U2B);*"zaal"tCHRiU28>t+"softwa 
re";+CHRS<128>; 
220 PRIST<S65, M IAHE \*\ 
230 PR I HT»97," ADDRESS:"! 
240 PftIIT$129,"T0VI :''; 
250 PRIIT«161, M P.C. :"; 
260 PRlHTU480,CHRi<128)i 
270 PRIHTe74 l *" , ;:IIPUTI» 
280 PRIHT*95,CHR*(128) i 

290 pRirr$ioe,"";;iiPin a* 

300 PRIlIT«127,CaR*<128); 

310 PRUT'ISS,"";: JIPUTT$ 

320 PRIHT»159,CHR$<128>; 

330 PRIHT«170, M "; : IBPUTPCS 

340 PRIBT«191,CHRS<128> 

35C PRIITei264 < M IS THIS CORRECT? 

360 PRI»T«326,S«; 

370 PR1STS358,A*; 

380 PRIIT&390.TS" ";PC«; 

390 PRIITS412.PS; 

400 YBJ=INKEY4:IF YRS=""THBN4O0 

410 IF YH$="Y"THEN 430 

420 IFYI*="I"THE*20 




430 ■ 

440 PRISTS481, 



450 S0UHEi97,4:PRIBT€4e8,"ready 

printer' 1 ; 

460 SOUffD179 1 4:PRIirT$488 l "R3ADY 

PRIITBR"; 

470 PRIIT5488, "ready printer"; 

480 S0UBD197,4:PRINT«4B8,"T*EADY 

PRISTeR'•;:SOtIHD179,4:PRIIT«484, ,, 

PRESS <snter> VHEI READY" ;: SOUND 

179,4 

490 EIEC44539 

500 ' FRINT1HG SCREEN 

510 CLS3 

520 • 

530 PRIBT©96,"BOV PRINTING YOUR 

ADDRESS LABEL."; 

540 PRHT0128, "===="=========== 

550 PR I JT«64 , " ====«======■==—=* 

560 PRIST'SSOO.irt; 

570 PRIPT52^4,A$; 

580 PRIHT<S328,TS" "+PCS; 

590 PRI8T9392.PJ; 

600 F0FT=lTO62:SET<T,29,l>:NiBXT 

610 PRINT#-2.Ii- 

620 PRIHT#-2,A* 

630 PRIHT#-2,T4" ";+PC* 

640 PRIIT#-2,"" 

650 PR1HT#-2,» M 

660 PR1HT#-2, MM 

670 'NEW PRINT QUIT 

680 ' RETURN SCREEB 

690 PRlHTf?483,"nEW LABBL: pRlHT 

AGAIN: qUIT 

700 BPi=IBKEY»; IF KP*="" THEN 70 



710 IFNPS= H J H THEN 20 

720 IFHPS="P'THEN 510 

730 IFNPS="Q"THEB 750 

740 G0TO700 

750 CLS;Z*=" ** ** ** QUIT * 

* ** ** " 

780 FOE A=l TO 100; PRINTZS;IBXTA 

770 POKE 113,0:EXEC40999 



O 
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VIDEO 

TITLES OIM 

NIC -10 




by John Kellett 



It has proved to be nuch easier 
than 1 expected to set up titles 
on the KC10. Vhat I needed to do 

was to Get up words oa the 
screen and record then at 
various places throughout a 
video recording. I wanted the 
words to scroll up the screen 
and toe time each line stays on 
the screen Is critical. I 
believe it should be just long 
enough for a fast reader to read 
It twice. I do not think the 
background colour needs to 
change. In fact it could be an 
advantage to have a coneletant 
colour appearing during the 
video. First, let ne explain 
how to connect your HC10 to the 
video recorder. Take the lead 
narked "To T.V."on the back of 
the XC10 and put it in the 
"Video In" socket at the back of 
the video recorder. Switch on 
both the computer and the video 
recorder. Then retune one of 
the spare channels on the video 
recorder so that the computer's 
screen display now appears on 
the T.V. via the video recorder. 
Vhen you have the picture on the 
ccraon, using the program below, 

or any prograa which displays 
Gone thing worth recording, Just 
press the record button as you 
would when recording from the 
T.7. low ta cot up the wards on 
the words on the screen, this 
cull progran lets you tioe the 
titles and the individualizes 
of each title by pressing any 
key to bring up the next line. A 
line which consists of Just the 
Bo. 1 causes the screen to clear 
and the next title to start four 
lines down frora the top. The 
POKE at line 10 gives extra 
clarity to the letters - on ay 
T.V. anyway. 



10 POKE 32768,64 

20 CLS 3 

30 IF IHRTO*"" THBH30 

40 PB1IT # 128 

50 READ AS 

60 IP AS ="1 H THBI 20 

70 PRUT AS 

60 IP IIXHTS ■ * n THEI 80 

90 GOTO 50 

100 DATA "VARIIHO JITBRHATIOIAL" 

110 DATA "AGRBBKESTS AHD UW 

120 DATA "PROTECT COPYRIGHTS" 

130 DATA '-UNAUTHORISED CGPYIHC" 

140 DATA "SHOVUG OR SBLLIHG" 

150 DATA "OF COVERED TAPES" 

100 DATA "CAR RESULT II CIVIL" 

170 DATA "FEHALTIES" 

180 DATA "uaDBR THB LAV" 

190 DATA l."0UR WORLD TOUR" 

Hote that the 1 in the last line 
will trigger line 60 to transfer 
control to line 20 go that the 
copyright warding is cleared off 

the screen before the title id 
displayed. Vhile you are 
recording you can pace the 
titles by reading then on the 
serosa yourself and then 

pressing any key to go on to the 
nex.t line. 1 had sone music as 
background so I synchronised the 
scrolling of the titles with the 
sound. To get fancier titles you 
cao set up borders and patterns 
by using a acre complicated 
progran than the one above. I 
suggest a standard fraae around 
the title could be called up 
whenever the code 2 Is 
recognised in the data 

statenents. Full anlnatlon of 

the titles needs a different 
approach. Minor changes to the 
picture can be saved In aenory 
and replayed while the video 
recorder is recording. Finally, 
remember that video tape 

recorders erase the tape ahead 
of the recording by a few 
inches, so you need to place 
these titles on the tape in 
sequence before recording the 
segments they refer to or else 
there will be blank areas on the 
tape. 




AMB 



from page 41 



64 ": YoaoOcl21<?X40PD:l$04063*l?S 
nlFOalFH0n?8G00SltiO ck>k"kbLO0O 

65 "8$0?9Ua«3Q?coQKcLKe v d=lPH61- 
<30*L73P'SPt2PC: 1$252XE:X<9: 43bl 
86 "F2Fh?3hn?S1000FlFfOG'OOhn3QO 
3Un)TOp:6>lf6t?LUP*01V?oOkno gmo 
67 " no KiLlt6~\E7AdK3Ph71*Ob2e<l 
0©000?ob2$3P0BYDZeM~lN?Vra£O *ca 

66 "oaomoir\on0o0Rrto leaORna ka3 
5iBRlknol200000(?000?KRkiDoO?o: oo 

69 "clPS40BI3hE1420H3ho?: *ok7ooo 
teZUHooora£PLCbl03be olRook\081i?l 

70 M >OcGH7bl«3bt o1G9k"00"L11<Voo 
ajX00003o: aofciiOhoaolE; UulbFOFab 

71 ")olOhb~8o40O oikoRobooobl olO 
08 EKD 

99 SAVE"261F:3":END 1 6 



o 




from page 40 



5320 PRIKT V*<n:PRINT<076,"5":PR 

INT984 , " 0-4" : FBI HT»02, " 1" 

5330 PRIST W*(2):FRINT<?108,"10 1 *: 

PRIHT<SllG,"0-6":PRINTG124 1 "3" 

5340 PRIHT WS(3):PRINTi?140 l "iO"; 

PRIHT<n48,"0-6":PRIHT«156 1 "3" 

5350 PRIHT V$<4):PRimi72 - ,, 20 M ; 

PRIHTSl80,"0-8":PRINT®188, w 4 M 

5360 PRIHT V$<5):PRINT<?204,"l5 M : 

PRirrS212, H 0-8":FRIHTG220, H 5" 

5370 PRl NT: FRI IT'HOHSTERS: " . PR I H 

T(5270, H HIT POUTS:" :K7=306 

5380 FOR X=l TO 5: PRIHT H$(X):PR 

lHTi?E7,HCX):K7=K7+32 

5390 HEXTX 

5400 PRIHTM£<6):FRIHT(?467 ( ,, l2 M 

5410 GOSUB1660 

5420 CLS:PRIHT»ll,Q$ 

5430 PRIHT«128,"T0 SEE THESE TAB 

LES AT AHY TIME" : PRIHT{?l70/'TTPE 

'TAELES'" 
5440 GOSUB1660 
5450 RETURN 



O 
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by Chris Deacon 



DRAGON VAS ORIGIBALLY a 128 
X 45 resolution picture eo 
1 have divided all the 
numbers x two. How everyone 
can have a dragon. The two 
screen dunps ore for the DKP 105 
printer. The first will print 

out a very big dragon. The 
second will print out a very 
snail dragon and will take a few 
minutes to print out. This Is 
because it puts the printer into 
graphics mode and It is dot 
addressing or, put slnplv, for 
every pixel on the printer 
prints one dot and this takes a 
lot of calculation. Maybe one 
day you will develop your own 
picture which you can use as a 
letterhead. If this program Is 
too slow for what you want then 
change line 6070 tc 6070 LPRIIT. 
Delete line 6090. Change line 
6140 to 6140 LPRIHT H-128; : 
■EXT; LPRIHT: LPRIHT: HEXT: 

LPRIHT CHRSC30): RETURH. 

This will take a few minutes 

to print out the cumbers wblcn 
will be used as data for the 
program on pages 37 and 36 in 
the 105 operation manual. How 
read the info on freehand 
drawing. Once you understand the 
program you fit the data with 
the program. Vhen you are 
finished you can print out your 
picture Id five seconds. It is 
well worth the effort. Both 
screen dumps have been written 
to work with Kike Turk's part of 
the program. The one change I 
made to Kike's program is to add 
P=l at the end of line 5130 and 
P-0 to line 5140 and is 
necessary to make both screen 
duttpc work . 



The Listing DRAGOH: 

6 REM DRAGON FROM THE BOOK 
TRS-86 GRAPHICS FOR THE MODEL I 
RND MODEL 11 BY DAVID A KATER 
& SUSAN J THOMAS 

1 rem 

10 CLS6 1 Y-2'P0KE49151,68'S»1 

26 t :EADX1 ] FXi*-|THENY*Y+l <GGT02 

Q 

25 IF XI— 2 THEN 46 

36 READX2>FQRX-XlT0X2«C-2 • G0SUB5 

ee0'iiEXTX'GOTO2e 

46 A*-IHKEY»-IF A*-"" THEN 40 

56 IF A»« M l" THEN GOSUB 6G66 

66 IF A*--2- THEM GOSUB 6870 

76 IF fi**"T" THEN GOSUB 10666 

86 GOTO 46 

IU DATA 31,33,-1 

126 DATA 30,32,-1 

130 DATA 28.39.-1 

146 DATA27,27,29.30.32,34,-i 

156 DATA II, 15/27, 27, 29,39.32. 34 

.-1 

166 DRTFU6, 16.23,33,42.43,-1 

176 0ATA8,16,22,34,41,45,- 

166 DfiTft.5, 17,30,35,48,56,- 

196 DATA!, 18,25.34,48,58,- 

266 DATfl.4, 19,28,34,39.63,- 

216 DATA6, 19,26,35.39.60,- 

226 DRTA7,26.2?,34»38,58,~ 

230 DRTA7, EM ,27,33,37,56.-: 

246 DATA6,21,26,33.36.55, - 

256 0ATfi5,22.26.32,34,56, - 

266 DATfi 1,62,-1 

278 DATA6. 57,-1 

260 DRTA7,22,24,32, 34.56, - 

298 DATA?, 21, 23, 32. 34, 54,- 

300 DATfi?. ?8, 22, 33. 35, 55, - 

318 DATfi6,19.22,34,36.59,- 

320 DRTA3, 19.21,33.37,53,- 

336 DflTA8, 18,21,33,38.56.- 

340 DATfill, 18,21,36,39.49,-1 

358 DATfill, 18.20,36.40.51,-1 

360 DATA18, 18,26,36,41 .54 ,-1 

378 DATA?, 17.20,39.42,56,-1 

386 DRTAI2, 17.28,39,43.49,59,66, 

-1 

398 DRTA15, 17,28.42,45-47,59,62, 

-1 

400 DATFI16, 17,20,42.46.48,56,63, 

-1 

410 r>RTfi!6. 17. 20.43. d7. 56, 56-68. 

-1 

428 DATfi 16, 16,20, 46,56,59,-1 

438 DATfi 26.46.55,59,-1 

446 DATfi 18,46,55, 58,-1 

45C DATFI17, 46,55.58,-1 

468 DATfil6,3?,41,49,52,58,-l 

470 DRTA16, 18,27,36,44.49,52,57, 

-1 



4 80 DATfi 16, 18,36,34,45,56.52, 57, 
-1 

496 DRTR16, 18,31. 33, 46, 56.-1 
568 DATA 16. 17,31,34,47,55,-1 
516 DATA 15,17,32,36.48,54,-1 
520 DATR11,26,2?,39,49,53.-1 
538 DRTR9, 11,14,16,19,22,26,27,3 
1 ,34.38,39,-1 
548 DATRI2, 15,29,32,-1 
556 DATR11, 12,29,39,-2 
4S&9 REM***. **********:* J******?:** 
5806 REM BY HIKE TURK 

5605 IFC>20RC<1THEHC"1 
5810 SS=>16384.XT«=IHT<X^2)--VT-INT 
< Y'3>'L-SS+XT + 32iYT'T»PEEKa> 
5020 IFX=2*XTTHENIFY«3*YTIHENM"3 
2'GOTO5108 

5030 IFX*2*XTTHENIFY«3*YT*1THENH 
H 8:GOTO5160 

5640 IFX«2*XTTHEHM=2'GOTQ5106 
5056 lFY*3*YTTHENM=!6'G0TO5iee 
5866 1FY*3*YT+1THEHM=4 .GOTO510B 
5670 M=) 
5166 C=*64*<C-1 > 

5116 IFS«1THEHT-<<HQRT>AND191 >+C 
: P0KEL.T 'RETURN 

5128 IFS—1THENP0KEL,< 255-M)ANDT 
i RETURN 

5136 S«M0RTMFS«TTHENS-IHT<<S-12 
8)'64>*l tpwl .RETURN 
5146 S*6'P-e-RETURN 
5156 REKXX*f:t:r*xt*»*t* > ttt*tt**t* 
6606 REM SCREEN DUMP 1 BY 
CHRISS DEACON 

6665 LPRIHTCHRK27 >iCHR*<26> 
6910 FORYe0TO47tLPRIHTTfiE<9>i » 
F 0RX^8T063 > S-6 i G0SUB5B66 

6620 IF P=l THEHLPRINTCHR*<239>J 

' G0TO6646 

6836 LPK1NT" m t 

6646 NEXTX:LPRINTNEXTY>LPR1HTCH 

R*< 27 >*CHR1C 54 > ■ RETURH 

6058 REM************************ 

6666 REM SCREEN DUMP 2 BY 

CHRISS DEACON 
6076 LPRIHTCHRK 18 > 
6080 R«l 'F0RK=OT047STEP7 
6898 LPRIHTCHfi*C27>>CMR*< 16>;CHR 
*<8>jCHR»<208)j 

6166 FORX=6T063FOR1=1T07 <Y»K*I 
61 16 IF Y>47 THEN 6136 
6126 S=6 GOSUB5800.R=R+itR>T-INT 
(R/2>:0=D-T*<P=1 > 
6138 NEXT'R«1>M=D+128'D*0 
6146 LFRINTCHPt(N)» i NEXT 'LPR1 NT i 
HEXT > LFR I NTCHR* < 30 > i RETURN 
6156 REM***:mt*:r«»X**X!m*t*X* 
16000 REM PUT YOUR SCREEN 
SAVE PROGRAM HERE 
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by David Hill 



THIS IS A great 8 ame to 
frustrate game players. 
All instructions are 

included In the listing. 
<A surt of double headed jame In 
which you have to guess ior the 
highest number and then prove if 
you are right or wrong. Hape you 
enjoy it. J. > 




IIICE1 



The Listing FLUKEY: 



M NtNmitttltmfMlff 

M M FLUKEY FORTUNE ** 
M II COMPOSED BY... *« 
H HI DfWID. J.HILL *t 
M *« AGE' 15 ** 

M ■« NOVEMBER' 1966, ** 
M IM E«itt*s«atitii fmin 

S'PRINT , '********FLUKEY 
********* -Pfc I NT"**»THE 
IS GAME IS T0****iPRIH 
ftLIVE AS LONG FIS YOU J 
IHr*f*CAH BY PICKING 

***" PRINT"***BETMEEN 
TO PICK ***"<PR1HT"M 
ULLY> YOUR***" 
R1NT6364. "HIT ftllY KEY 

E "-ft* « IHKEY$ 

" THEN Id 
LS 

RINT"*** FORTUHE-HHD I 
st$*t"<PRIHT"$*»TRY RM 
E NUMBER ***" PRINT** 
IS THINKING. YOU »$t» 
RINT"***HftVE ft 56/59 C 
S-t**" -PRINT"********* 

RIIITG44S. "WE RHRIT YOU 
" < A* « INKEY* 



IFORTU 
RIM 
T"***$ 
**■ 

H NUMB 
l HUD 

♦UP <H 

ID CON 
'IF ft* 



HEN YO 
C» CUES 
**THRT 

HHHCE- 
«**! 

R SIGN 
'IF fl* 



IB 
19 

20 

E J 

£3 

SOUH 
£4 P 
25 P 
2G N 
HDC I 

ee>; 

PND< 
2? w 

IKK I 
32 F 
©UNO 

34 G 

35 G 

>■ 

93 I 
994 

595 
39* 
*9? 
596 



IS YOUR NRNE'lNfltl 



- THEN 14 

C-=e=Ta5 

LS 

HPUT -HHflT 

LS 

ORR«0TO63<SET<R,24.8>'NEXTR- 

L>200.3 

RIHTe*125. "SCORE OF "iNFHE* 

RINT84S9, ■ « " i SC 

=RMC>< 10666) •0.«RHD< 16000)P»R 

Beea>»e-RHo< 10&00V z=riii>< i ee 

S=PHD( 10000 >'T"RNDC 10003 ) ' U" 

ieeao)'V-RHD( 10000) 

=RW»< 10000? <X*RHP< l00ee> , Y=R 

0000) 

OPRb0TO€3'S€T<R,4,8>'NEKTR S 

200.3 

OSUB930 

OSUB200O'GOTO25- 

PRIHTee. "PICK H NUMBER C I - 12 

1HPDTIIUM* 

PRIHTei28,"l-"iH 

PRIMTei92,"2-";0 

FPIHll»256,"3-";P 

PRIH1&320, "4-"jQ 

PPlinei3S."5-";Z 



599 PRniT|>202i-6-"iS 
1000 FR1NT&266. m 7~ m H 
l&Ol FRINTe330, "0--JU 

1002 PRIlUeue. "9-"iV 

1003 PRJNT8212, "l0-"iM 

1004 PP1IIT&27*. Mt-">X 

1005 PRINT* 340» "12-"jV 

1008 IFHUMtB-rTHEHSC'SC+U'RETUR 
H 

1009 1FHUI1*-«"2 W THEMSC=SC*U'RETUR 
N 

1010 IFHUM*="2'"THEHSC = SC+P'RETUR 
N 

1012 I FHUM*-"4-THEHSC- SC+Q I RET UP 
H 

1013 IF|IUH* = "5"THEHSC=SC + Z!PETUR 

N 

1014 IFHUMJ-="6"THEHSC*SC+S'RETUR 
H 

1015 1FIIUH*--7"THENSC-SC+T RETUR 
11 

1016 IFHUM*=-€"THEHSC«SC+U'RETUR 
N 

101? IFHUM**-S"THEHSC«SC+V< RETUR 
H 

1018 IFHUH*="ie"THEHSC-SC+H'RETU 
RN 

101? IFHUHf ="11 "TMENSC*SC+KipETU 
RN 

1026 1FHU!1*="1£"THENSG«>SC+Y>RETU 

RN 

2O09 F0RR=0TO2» SOUND 1 DO. 5 < SOUND 1 

00- 5 i SOUND! 50-5 ' S0UND1 30. 5 ' NEXTR 

■PRIMTftlZB 

2001 PR IHT(> 192 

2002 PR 1 Hit 256 
2603 PR]HTft3£e 

2004 PRINTP296, "THINK WISELY ftBO 
LIT THIS..." 

£fi»3 IN PUT "00 VOU WHIM HhHDS- I 

R TFiJLS-2";LUCn 

2006 X=R!U«<2>'1FXOLUCKTHEM3000 

200? PRINTC206 

2005 PRINT6326 
2O09 PR1IIT&352 

£010 PR 1HT«293, "LUCKY" ;NRNE*SGU 

ND288, I0PP1N1G295 

201 ) RETURN 

3068 GLS0PPIIITB295. "YOU LOSE "j 

NAME* »PGINT*339, "YOU SCORED'" jSC 

i INPUT "ANOTHER OOME <Y*-H>"*ft* 

3001 IF ft* b -Y" THENRUN18 

3002 IF ft* - "H" THEN CLS8F0RI= 
I 638-1 TO 16035 'POKE I -32- NEXT 1 

3003 PRINTG2G9, UN* «nd";tGOTO30 
03 
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by David Hill 



This is a utility program. 
It can help the High Schopl 
student with his homework 
or Just plain help anyone at 
hone. It has four useful 
functions - square root and the 
three trig functions, the eaey 
instructions are included In the 
Uoting. 



The Listing KATHHELP: 



**MfiTHEHRTICS HELP** 
** COMPOSED BY- *t 
** bflVMt'. J.HILL it 
** M0VEHBER/'l9e6 ** 

tttttttttttutntttt 



I RE II 

Z REN 

3 REH 

4 REH 

5 RE11 

6 REM 

le cls 

12 IHPUT-DO YOU HflHT 1) SQUARE R 

OOT 2> SINE 3> COSINE.. 

4 > THNGEANT ' i Q 

13 IFP*1THEU28 

14 IF0=2THEU48 

15 ifp=3theii60 

16 ifqmthen78 
20 cls 

22 input"hhat i& the number you 
wish 10 hrye square rooted" i h 
24 print print 
26 print sqrcn> 

2? GOT01«G" 

4G CLS 

41 INPUT "NHflT IS ANCLE fl <Rfl>"sft 
fl> IFRA*8ORfifl>180THEH50 

42 IMPUT-UHftT IS ANCLE B <AB>"jA 
B' IFFtB<00RflB>iee<THE?15e 

43 IHPUfHHRT IS SIDE C (SC)-jSC 

■ IFSC<OTHENS0 

45 lF<AA+nB»AC><>188THEN50 

46 Rfl-f»ft^5?« 2957795 1 ■ RB=ABv57. 29 
577951 RORC57. 29577951 

47 SA=<< SINCBA) >/<SIN<RC>>>*SC* I 
Ps*K©THEN5e 

48 SB=<< S1NCAB>>/<SIN(RC>>>*SC< I 
FSCC0THEN58 

4? CLS'PRlNfSlfcE R < SR > IS" Sfi 

•LONG" 'PRINT-SIDE B C SB > IS" SB 

"LONG" -PR HIT i GOTO 1 DP 

58 C1_$:PR1HT"S0KRY*M>T fl TRIflNGL 

E.TRY AGAIN" i «GOT04€ 

6© CLS 

61 INPUT "HHflT IS ANCLE C <RO"jR 
C' IFflC<80RRC>-iS0TrtEN67 

62 RC"AC/5?. 29577951 

63 INPUT "HURT IS SIDE R <Sfl>";SA 
•IFSAC0THEH67 

64 INPUT -HURT IS SIDE B <SB>";SB 



' IFS8=<8THEN67 

65 BC»< t £A A 2 >»< SB*2 > >-< 2*< SAtSB* 
C C1S< AC > > > i I FSC<8THEN67 

66 CLS i PRINT "SIDE C <SC> IS" S«R 
<SC> "LONG" PRIHT-GOTOlOe 

67 CLS 'PR INT"S0RRY. NOT fl TRIRHGL 
E.TRY AGAIN" > C0TO68 

?e CLS 

71 1HPUT-HHRT IS SIDE B CSBV>SB 
• 1FSF:=<8THEN76 

72 INPUT 'MHDT 1G fiNGLC R <fin>"iR 



fl' IFflH>=]88TNEN76 

73 AA=Rft/57. 29577951 

74 SC-SBUTflN<flfl>): IFSC<8THEH76 

75 CLS'PRIMTSIDE C CSC) IS" SC 
"LONG - 'GOT010© 

76 CL?:. PRINT -SORRY, NOT R TRIRHGL 
E. TRY RGfllN- G0T078 

188 INPU1"D0 YOU WISH TO OUIT";R 
% 

101 IF H*-"Y B THENCLS*EHD 
182 1Ffi*0-V»THEHRUN 
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by Chris Deacon 



A 128 X 64 SBT GRID for the 
DHP 105 printer. This Is not 
suitable for TP10 thermal 

printer. I tried it out and 
all I got out of it seened to be 
a lot of randon numbers but It 
was worth a try because stranger 

thingc have happened. I would 

like to know if this grid will 
print out on a DKP 110 or any 
other printer- 

The Listing BSETGRID: 

6 REM 128X64 SET GRID 

FOR THE 185 PRINTER 
BY CHRISS DEACON. 



3 REM THIS PROG 
NORI1RL MODE RN 

AHD TAKES TIME 
GRID ON T 

4 REM THE BEST 
ONE COPY THEN I 
COPYING MACHINE 

CO 

5 REM BUT IT IS 

MOT 
LPR1NTCHH*<2 
LPRIMTCHKK2 
LPRIHTTAB<3> 
FORU0T0127. 
'J * GOT 058 
45 LPRIHTHIDKS 
50 NEKT'LPR!NT> 
86 FtiRI»0TO127< 
&■; 'GOTO90 



28 
25 
38 
40 

"0' 



PAM MIXES t:0TH 
D GRAPHICS MODE 
TO PRINT OUT THE 
HE PRINTER 
IDEA IS TO RUN OF 
F YOU CAN FIND A 

THEN RUN OF SOME 
PY'S 

AH IDER I HRVE 
TRIED 

7>»CHR*<56> 
7>jCHR*<20> 

IFKIGOTHEMLPRINT 

TR*Cl),2,i}; 

LPR1NTTRB<3>* 
1FK10THENLPRINT" 



85 IF I>99THEHLPRINTM1D«<STR«C 1 >» 

3/ 1 >i 'COTO90 

88 LPRINTMID*<STR*< I ), 2, 1 > j 

90 NEXT'LPRIHT'LPRIHTTflB<3>; 

95 FORI*eT0127^LPRINTRIGHT*(STR» 

CI ).l >> 'NEXT SPRINT 

1 18 FOR Tb0TO63 

12© LFRIMTI1U)*C STRICT >.2)» CHR*C 1 

8>j 

126 LPRIMTCHR*C27>;CHR*< 16>;CHR» 

<G>)jCHRSC 17 > j 

130 FORl»0TO127=LPRINTCMR*C255)i 
CHft*< 1 2$ > ; CHR*< 1 29 > i CHR S< 1 29 > i 

131 LPRIHTCHR»C129>>CHR*< 129>/ 

135 NEXl'LPftINTCHR*(255>apRlHTC 
Hft#< 30 >; ' NEXT'LPRIHTCHR#< 18)j 

136 LPPINTC:HRI(27)jCHR*C16)jCMR* 
CB>iCHR*< 17 > j 

137 FORIb0TO768=LPRIHTCHR*C 129)j 
'MEX1 

139 LPRIHTCHR*C38) 
148 LPR]HTGHR*<£7)J CHR*< 19 >>CHR* 
C14>/CHR*^27>iCHRJC54> 1 EIID 
145 REM************************* 
REM PRINTER CODES EXPLAINED 
REM CHP*C27 >; CHR*< 28 )« 133 
CHARACTERS PER LINE 
155 REM CHR$<27>;CHR*<56) = 3/4 

FORWARD LINE FEED 
168 REM CHRX1R) PUTS PRINTER 
INTO GRAPHICS MODE 
REM*************************) 
REM CHR*(27)jCHR*< 19>=N0RMAL 
80 CHRRRCTERS PER LINE 
175 REM CHR»(27 >jCHR*<54 )«FULL 
FORWARD LINE FEED 
CHRK30) PUTS PRINTER 
INTO NORMAL MODE 



146 
150 



165 
178 



176 
O 



REM 



46 



2610 FOR P=l TO 4: Ai=RND<9) ;B1 = R 
ND<A1>: A2 = RBD<6>:A3=R?JD<9>:B3=RN 
D<A3)-1 

2620 B2=ESD<9);IF B2<=A2 THEH262 


2630 GOTO2420 

2700 N=10:FOR R=l TO S:PRIST*-2, 
E$ 

2710 FOR P-l TO 4: A1=RHD<8>: A2=R 
NDC»J:A3=SNDt9>:B3 = RNBU3>-l 
2720 B1=RND<9):IF BK=A1 THEH272 


2730 B2=RSD(9):IF B2<=A2 THEN273 


2740 G0TO2420 

2900 N=10:FOR R=l TO N:PRINT#~2, 
B$ 

2810 FOR P=l TO4:A2=RHD(8):Al = 0: 
A3=KND19) : D3-RND(AS) ; D1-RND(9> 
2820 B2=RND(9);IF B2<=A2 THEN282 


2830 COTO2420 

2900 N=10:FOR R-=l TO N:PRINT#-2, 
E$ 

2910 FOR P=l TO 4: A1^RHD<8): A2=0 
:A3=RND(9):E3=RNDCA3>-1:B2=RND(9 
) 

2020 B1*RHP(9>! IF BK=AJ THFN292 


2930 GQT02420 

3000 N=10:FOR R=l TO N:PRINT#-2, 
E£ 

3010 FOR P=l TO 4:A1-=0:A2=0:A3=R 
ND (9 > : Bl = RHD (9 > : B2=RND (9) : B3=RND 
(A3)-l:GOTO2420 

3100 N=8:FOR R=l TO N:PRINT#-2,E 
S 

3110 FOR P=l TO 4:A1=RND<9>:A2=R 
ND(9>:A3=R»D(9):A4=RND<9):B1-RND 
(9> : B2=RND(9) : B3=RHD(A3> I B4=RND< 
A4>-1 

3120 CCP)-Al + A2UO4A3*100-fA4*100 
0:B<P)=B1+B2*10+B3*100+B4*1000:A 
<R,P)=C(P)-B(P):HEHP 
3130 GOSUB5000:LX=5:GOSUB600O:SE 
XTR:GOT011SO 

32UU N=8:HJN U = l IV N: I J K I BT#-2, E 
S 

3210 FOR P=l TO 4: A1=RND<8) : A2=0 
! A3=0: A4=RHD(9> : B4=RND<A4 )-l : B2* 
RND<9):B3=RND<9> 

3220 Bl=RNt)<9>:lF B1<=A1 THEH322 


3230 GOTO3120 

3300 N=5:FOR R = l TO N:PR!NT#-2,E 
ft 

3310 FOR P=l TO 4;G05UB780;CCP>= 
RR 

3320 GOSUB780: IF RK)C<P) THES332 
ELSE B(P5=RR 
3330 A<R,P5=C<P)-B<P>:NEXTP 
334 GOSUB5000:LX=6:GOSUB6000:FE 
XTR:GOT01180 

5000 FOR P=l TO 4:FRIHT*-2,USfNG 
Flt;C<P) ; :BEXTP: PR:NT*-2, " »' 
5010 FOR P=l TO 4:PRIHT#-2,USISG 
FUiB(P); :BEXTP: PR iNTff-2, STRINGS 
(35,8); 
5020 RETURH 

6000 FOR P=l TO 4:PRI5T#-2,TAB(9 
*P-K68-LX)); ,, -";:HEXTP:PRIHT*-2 1 



6010 FOR P=l TO 4;PRINT#-2,STRIN 
Gt(7-LX>32>;STRINGS<LX+1,45>;" " 

;: NEXTP: PRIBT#-2," M : RETURN 



The Listing: 



1 'DIV1SI0H WORKSHEET 

BY DEAH HODGSON 

2 GOTO10 

3 EAVE"DIVSHEET:2":STOF 
10 CLEAF200 

15 E$=CHR*U3> 

20 CLS:FH="###,#### ":F2E="+### 
*8 t lt " 

100 CLS: PRI HT" ADJUST PAPER TO TO 

P OF FORK." :PRINT&96,"£XPHASIZED 

PEINT "; : IBFUTA*: IFA*="Y"ORAS=" 

YES" THEKPRI NT#-2, CHRS CS7)CHRS <60 

>; 

400 GOSUB9&0:PRIHT<S320,"A,B,C,D, 

E.F.G.H.I.J.K.L.H" 

405 PRIBT0128, "REFER TC KAHUAL F 

OR TYPE BREAK- DOVH. " 

420 PX=464:G0SUB90O 

430 IF AK"A M OR A$>"M" THEB400 

440 GOTO40O0 

780 RR=RND(9>*1E4+RNDC9999):RETU 

RN 

900 ZS=INKEYS 

910 PRIHT@PX,CHR$(128>; 

920 A*=INKEY4:IF AJO"" THEN PRI 

HTCPX.AS; : RETURN 

930 GOTO920 

950 IF INKEY$OCHR$U3> THEN 950 

ELSE RETURN 
960 CLS:PRINT"VHICH TYFE OF PROB 
LEK DO YOU VANT GENERATED?" 

970 PRINT<?448,"TYPE LETTER": RETU 
RN 
9B0 FRINT<?480,"OR PRESS SPACEBAR 

TO SEE NORE";: RETURN 
1160 PRIRT*-2,STRINGi(l5,13);"AN 
SVERS. . . ";CHRS<13> 
1190 FOR R=l TO N;FOR F=l TO 4:P 
RIBT#-2 , USINGFl»i A (R, P>; : NEXTP: P 
RlET*-2," ".-NEXTR 
1195 PRINTff-S.STRINGSClO.lShEND 
400O CLS:PRINT"DIVISION PROBLEMS 

TYPE " ; A$ 
4010 PRINT#-2,CHRS(27)CHRS(875CH 
RJ(l>iTABa5) M DlVISlOH ";AJ 
4020 SK=ASC(AS>-64:ON SK GOTO 41 
00,4200,4300,4400,4500,4600,4700 
,4800,4900, 8000 ,81 00, &200, 8300 
4 ICO FOB R-l TO 10: PRlBT#-3, E* 

4110 FOR P=l TO 3:A=RWC<9>;B=FND 

C4)fl:PFINT#-2,TAB(CP-l)*13);A*B 

;"/";B; M ="; : NEXTP: PRIST#-2, H " 

4120 NEXTR: G0TOU95 

4200 FOR R=l TO 10: PRINT#-2,EJ 

4210 FOR P=0 TO 2: A=RHCC9> : B=RND 

<4>+5: PRINT 9-2, TAB <P*13> ; A*B; ••/" 

; B;"=" ; : NEXTP: FRINT#-2," ": NEXTR 

:GCT01195 

4300 FOR R=l TO 10: PRINT#-2, El 

4310 FOR F=0 TO 2: A=RHE<9> : B=RND 

<9>:PRIBT*-2,TAB(P*13),A*B;V M ;B 

;"=";: NEXTP: PRI NT#-2," ": NEXTR: G 

0TC1195 

440O V=3:N=10:FOR R=l TO 5: PRINT 

#-2, E$ 



4410 FOR P-l TO 4:B=RND<4> 

4420 A1 = RND(9>:IF INT <A1/BX>A1/ 

B THEN4420 

4422 A2=PND<9):IF INT<A2/BX>A2/ 

B TKEN4422 

4425 C(P)=A1*10U2:B(P)=B:ACR P P) 

=C(P)/BCP>:BEXTP 

4430 GQSUB5000 

4435 NEXTR 

4440 FOR R=6 TO N: FRlflT*-2,ES 

4450 FOR P=l TO 4:B=RNE<4> 

4455 A1=RRD(9):IF INT (A1/BJOA1/ 

B THEN4455 

4457 A2=RND<9):IF INT CA2/B)OA2/ 

B THEN4457 

4459 A3=RND-<9): IF INT (A3/BJOA3/ 
B THEN4459 

4460 C<P>=Al*100+A2*10tA3:R(P>=B 
tA(R,P>-C<P)/D(r):BEXTr 

4470 G0SUB5000: NEXTR: GOTO1180 

4500 V=3:N=10:FOR R=l TO »:PRINT 

#-2,E$ 

4510 FOR P=l TO 4:B(P)=RHD(9> 

4520 C(P>=RBD(99): IF C(P)<=10 TH 

EN4520 

4530 A<R,P>=C(P>/B<P>:D<R,F>=B<P 

) : NEXTP 

4540 GOSUB5000 

4550 NEXTR: G0TO6000 

4600 N=8:F0R R=l TO N:PRIIT#-2,E 

$ 

4610 FOR P=l TO 3:BCP>=RHD<9> 

4620 CIP)=RKDC999): IF C(P><100 T 

HEN4620 

4630 A(R,P)=C<P>/B<P?;D<R.F)=B(P 

) : NEXTP 

4640 V=3:GOSUB5000 

4650 NEXTR: G0TO6000 

4700 N=7:V=3:FOR R=l TO N:FRINT# 

-2.ES 

4710 FOR P=l TO V:B<P>=RND(9> 

4720 C<P> = RHD<9999): IF C(PX1000 

THEN4720 
4730 GOT04630 

4800 N-7:V=3:FOR R=l TO N: FRIHT# 
-2,ES 
4810 FUR f=2 TU V: b(FJ = KNUl9>*10 

4820 C(P)=RBD(9995:IF C(P><100 T 

HEN4820 

4830 GOT04630 

4900 N=6:V=3:FOR R=l TO N: PRIHTf 

-2.ES 

4910 FOR P=l TO V:B(P)=RND(9)*10 

4920 G0T04720 

5000 FOR Q=l TO V 

5010 L»LEN CGTRt (C (Q> > ) : LY-LEH (S 

TRJ(B(Q>)> 

5020 PEINT#-2 l STRIHGt(LYt2,32>;S 

TRINGS*LX,95);STRinG$(16-V''(LYtL 

X42),32>i:NEXTQ:PRINT#-2." M 

5025 FOR Q=l TO V 

5030 PEINT#-2,B(Q);CHR*<4L);C<Q) 

; STRI NOS ( 15- V- (LY+LX+2 ) , 32) ; : SEX 

TQ: PRIST#-2, STRINGS (LX, 13);: RETU 

RN 

6000 PPINT#-2,STRIBG»(15 l 13)i"AN 

SVERS. ..";CHR$C13> 

6010 FOR R=l TO B:F0R F=l TO V 

6020 AH=FIX(A<R,P)):RM-A(R,P)-AN 

:RM=INTCRH*D(R,P)+.5) 

6030 PEINT*-2, AN;"R";RM; H " ; ; NE 

continued next page 
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1GK ECB 



LOTTO CHECKER IS a program 
na.de to check your lotto 
results. Just enter your 
numbers plus your supplementary 
numbers. 

Then enter what the results 
were and the computer will give 
you the results. 



The Listing: 

GOTO10 

3 SAVE"211:3":END' 10 

10 • m************************* 

20 '*******LOTT0 CHECKER******** 
30 ( *****nBY VAYNE KELYt******* 
40 ' ******CREATED 3/1/37****** 
50 '**************************** 
80 CIS: POKE 359, 57: SCREES 0,1: PR 
IHTG3,"L OTTO CHECKER 

90 PRINT: PRIWT: INPUT"VHAT SYSTEM 
DO YUU HAVE:"; A 
100 IF A<6 THEN GOTO 80 
110 'XENTER THIS WEEK'S DRAW SO* 
120 CLS: PRINT: FRIST: PRINT"ENTEF 
THIS VEEK'S NO.S" 
130 FOR T=l TO 6 

ldO PPINT'FNTRR NO. " ; T: INPUTX (T) 
; IF K(T)=0 OR X<T)>45 THEN 140 



APPLICATION 

150 NEXT T: PRINT: TRIHT"ENTER SUP 

PLENENTARY": IHPUT'IST SUPP";X<7> 

: PRINT : INPUT" 2ND SUPP";X<8> 

160 CLS:FKIBT"ARE THESE THE CORE 

ECT NO.S (Y/H) M 

170 FOR T=l TO 8:PRIHTTABU0)T". 

"X<T> :NEXT T 
180 INPUT YNS:IF YN$="r THEN GO 
TO 120 

185 '*** ENTER COUPON HO.S *** 
190 CLS: PRINT: PRINT: PRINT-ENTER 
YOUR HUMBERG " 
200 FOR X=l TO A 
210 PRINT"ENTER HO. ";X: INFUT T( 

X) 

220 IF T(X)=0 OR T(X)>45 THE* 21 



230 NEXT 

240 CLS:PRINT:PRIHT»ARE THESs TH 

E CORRECT NO.S <Y/N>?":FOR 

X=l TO A:PR1KTTAB(10)X M ."T(X):NE 

XT 

250 INPUT YNS:IF YNS="N" THEN CI, 

S:GOTO 190 

260 IF YH»="Y" THEN 280 

2T0 GOTO 240 

280 FOR C=l TO A 

290 FOR Y=l TO 6 

300 IF T(C>=X<Y) THEN CO=CQ-tl 

310 hex: y.c 

320 FOR F=l TO 8 



by Wayne Kely 



from previous page 






HEN8030 


XTP:FRINT#-2," " 


8040 A(P,P>=C(P)/B(P):D<R,P) = B(P 


6040 NEXTR:G0TO1195 


) ; NEXTP 


8000 N=5:V=3:FOR R=l TO NiPRINT* 


8050 GOSUB50O0:NEXTR:GOTO6000 


-2,E* 


8100 N^4:V=3:FOR R=l TO N: PRIST* 


8010 FOR P=l TO V 


-2, El 


8020 B(P>=RND<29): IF B(P)<>11 TH 


8110 FOE P^l TO V:B<P>=RND(9>*10 


EH3020 


+RNDC9) 


3030 C<P)=RND<999);IF CCPX100 T 


8120 C(P>=RND(9999>: IF CCPX1000 



330 FOR Z=7 TO 3 

340 IF T(F)=X<2> THEN SP=SP+1 

35o NEXT 2,F 

360 IF COO 7HEH GOTO 440 

370 IF C0=3 AND SP>0 THES V=5 

380 IF CO=4 THEN V=4 

390 IF CO=5 THEN V=3 

400 IF C0=5 AND SP>0 THEH V=2 

410 IF CO=6 THEN GOTO 480 

420 CLSiPRlHT'HEY, YOU GOT A ";¥ 

;" DIVISION VSN. THAT'S PRETTY 

GOOD." 

430 SOUND 100,1: FOR U=l TO 2000: 

NEXT: GOTO 450 

440 CLS:PRINT:FRINT"SORRY, BUT Y 

OU ONLY GOT ■ ;CO;" NUMBERS. 

BETTER LOCK NEXT TIME": END 

450 CLS: FEINT: PR1HT"D0 ANOTHER C 

OUPON SCAB (i/N) M 

460 INPUTYNS: IF YN$="Y M THEH GOT 

190 

470 END 

480 FOR T=l TO 50:CLSRSD<9>-1:SO 

USDT,1:NEXT 

490 CLS: PRINT: PR 1ST: PRI ITT: PRINT" 
GUESS WHAT? YOU HAVE WON THE 
BIG ONE. YOU'RE NOV OHE RICH 
DUDE. " 

500 END 

o 



THEN3120 
8130 GOTO804C 

8200 H=4:V=3:FOR F=l TO N;FR1NT# 
-2.ES 

8210 FOR P=l TO V 
8220 B(P)=RND<9)*10+RKD(9> 
8230 G05UB780:C<P3=RR:GOT08040 
8300 N=4:V=3:FOR R=l TO »: PRINT* 
-2.E$ 

8310 FOR P=l TO V:B(P)^RHDC9)*10 
+RWD<9) 

6320 C<P>=FND<9)*1E5+RND<9>*1E4+- 
RND(9999>;GO~O804 

o 
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Diaw Is a simple PASCAL 
program which should compile 
using most versions of PASCAL 
<with very little 

modifications). This one was 
compiled using TURBO PASCAL. 

The program ts Just a child's 
fun program. Trying to tench a 
young child what keys do what is 



Tandy 1000 



progran DRAV (IIPUT, OUTPUT); 



the hardest part but when they 

are competent you will enjoy 
just what your child can create. 

There is nothing special about 
the program. It ie as straight 
forward as you will get It, You 
could dress It up a bit for yoiir 
1 iking. Add new comaands, etc. 

Have fun and happy computing. 



by Leigh Dawes 



<This progran draws according to key pressed. I is up, X is down, K is right 
J Is left, D ts draw, and E is to erase a pixel, Q is to quit, C is to clear 
the screen, U is IV, is HE, comma is SE, and S is SV) 



const 



RIGHTBQRDER = 600; 
LEFTBORDER ■ 0; 
T0PB0RDER = 20; 
BOTTOHBORDER =191; 
STEP = 5; 



type 



<Screen border liaits) 



(This is the difference in stepping) 



PIXELTTPB = (DRAV, ERASE); {Cursor can draw or erase) 



var 



XI, X2, Yl, Y2, 

COLOR : IBTEGER; 
CH : CHAR; 
PIXEL : PIXELTYPB; 
FLAG : B0GLBAB; 



{Co-ordinates) 

{color number. 16 off. 5 is on) 

(character variable) 

{pixel type) 



procedure CLEARSCREEI; 

{Clears the screen. Kay use something else on other machines) 

begin {CLBARSCREEH) 

CLRSCR <not standard pascal) 
end; {CLEARSCREEN) 



procedure 1KTRO; 
{Introduction display) 
var 

REPLY : CHAR; 



begin UHTR0) 

CLEARSCREEN; 

GOTOXY (5, 5); 

VRITBLB <• JACKIE 1 ' S DRAVIHG 

GOTOXY C5, 10); 

VRITELH <'By Leigh Dawes 6/5/87' >; 

GOTOXY (5, 12); 
VRITELH <' <c)opyright 1987'); 
GOTOXY <5, 20); 

VRITELH <' Please type any key.'); 
READ (KBD, REPLY) 
end; <IITR0> 



P R G R A X" ) 



procedure IRITIALIZE; 
begin {INITIALIZE) 
CLEARSCREEI; 

{swaps to high resolution screen) 
HIRES; {not standard pascal) 
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{initialize pixel to draw and co-ordinates) 

PIIBL ;= DRAV; 

XI := LEFTBORDER; 

X2 ;= LEFTBORDER + STEP; 

Yl := TOPBORDER; 

Y2 := TOPBORDER + STEP; 

<di6play to screen the commands) 
GOTOXY <!,!>; (not standard pascal) 

VRITELS CODDOWl <I>UP: <J>LEFT: <K>RIGHT <IT>SV: <0>HE: <<>SE: <S>SV: '); 
VRITELH (^OLEARSCREEH: <Q>DIT: <D>RAV: <B>RASB'>; 
end; (IIITIALIZE) 

procedure ERRORS0U8D; 

{Used when cursor tries to go off the screen) 

begin <ERRORSOUHD> 

VRITE €CHR<7)> 
end; (ERRORSOUKD) 



procedure GODRAV; 

(Sets color then draws the line to screen) 
begin <GODRAW) 

if PIXEL = DRAV then 

COLOR := STEP 
else 

COLOR := 0; 
(endif) 

DRAW <Xl,n,X2,Y2, color; 
end; (GODRAV) 



procedure SAVEOLDPOS; 
(eaves old co-ordlnatee) 

begin <SAVBOLDPOS) 

X2 ;= XI; . 
Y2 := 71 

end; <SAVE0LDPOS> 

procedure CHECKDIR; 

(Checks co-ordinates for illegal screen positions and acts accordingly) 

begin (CHECKDIR) 

if XI < LEFTBORDER then 
begin (if) 

XI := LEFTBORDER; 
ERRORSOUKD 
end; (if) 
if XI > RIGHTBORDER then 
begin <if> 

XI := RIGHTBORDER; 
ERRORSOUHD 
end; (if) 
if Yl < TOPBORDER then 
begin (if) 

Yl := TOPBORDER; 
ERRORSOUHD 
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end; {if) 
if Yl > BGTTONBORDER then 
begin {if) 

Yl ;- B0TT0MBORDER; 
ERRORSOUHD 
end; <lf) 
end; {CHECKDIR) 

procedure UPDIR; 

<Updates cursor position chosen by 'I* for up) 

begin (UPDIR) 

Yl : = Yl - STEP; 
end; {UPDIR) 

procedure DOVSDIR; 

{Updates cursor position chosen by 'M* for bottom) 

begin (DOVHDIR) 

Yl := Yl + STEP; 
end; {DOVNDIR) 

procedure RIGHTDIR; 

{Updates cursor position chosen by *K* for right) 

begin {RIGHTDIR) 

XI := XI + STEP; 
end; {RIGHTDIR) 

procedure LEFTDIR; 

{Updates cursor position chosen by *J* for left) 

begin {LEFTDIR) 

XI := XI - STEP; 
end; {LEFTDIR) 

procedure HVDIR; 

i 

{Updates cursor position chosen by 'A 1 ) 

begin {HVDIR) 

UPDIR; 

LEFTDIR 
end; {HVDIR) 

procedure HEDIR; 

{Updates cursor position chosen by 'S') 

begin <IEDIR) 
UPDIR; 
RIGHTDIR 

end; {HEDIR) 

procedure SEDIR; 

{Updates cursor position chosen by 'X' > 
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begin (SEDIR) 
RIGHTDIR; 
DOVHDIR 

end; <SEDIR) 



procedure SVDIR; 

(Updates cursor position chosen by •Z') 

begin (SVDIR) 

LEFTDIB; 

DOVHDIR 
end; <SVDIR) 



procedure DRAVPIXBL; 
(Draws pixel to screen) 

begin <DRAVPIXBL> 

P1IEL *.- DRAVj 
GODRAV 

end; <DRAVPIXBL> 

procedure ERASEPIXEL; 
(Erases pixel off screen) 

begin {ERASEPIXEL) 

PIXEL := ERASE; 
GODRAV 

end; <ERASBPIXEL) 



procedure CHECK; 

{Checks what character has been pressed and acts accordingly) 



begin (CHECK) 




if PIXEL 


C> DRAV tnen 


GODRAV 


i 


SAVEOLDPOS; 


case CH of 


•D* 


DRAVPIXBL; 


'£' 


ERASEPIXEL; 


•I' 


UPDIR; 


'M' 


DOVHDIR; 


•K' 


RIGHTDIR; 


•J* 


LEFTDIR; 


'U 1 


NVDIR; 


*0» 


BEDIR; 


t 1 

t 


SKDIBs 


'»* 


SVDIR; 


•c 


INITIALIZE; 


•Q' 


CLEARSCRBBH 


else 


(this lice and next line nay not be accepted) 


FLAG 


■ FALSE (using standard pascal.) 



end; (case) 

CHECKDIR; 

GODRAV; 
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If PtXEL = ERASE then 
begin 

PIXEL := DRAV; 
GODRAW; 

PIXEL := ERASE 
end 
end; {CHECK) 



begin <DRAV) 

(Intro screen displayed) 
IHTRO; 

<go and Initialize variables and bring hires screen on) 
IHITIALIZE; 

<get character and act on it) 
repeat 

FLAG := TRUE; 

READ <KBD, CH) ; (KBD not standard pascal) 

CH := UPCASB(CH); 

CHBCK; 

if FLAG = FALSB then 
EERORSQUHDj 
until CH = 'Q 1 ; 

end. <DRAV) 

(by Leigh Dawes, (051) 745552 for comments and questions.) 




SEEN 

GOLDLINK 

YET? 



You can only access GOLDLINK on VIATEL 
if you have a videotex terminal program 
and a modem capable of operating at 1200/75 baud. 

Now Goldsoft presents two great specials! 

1 CoCo Owners: Modem, GoCotex Software 

and cable $295.00 

2 TANDY 10OO or IBM PC Owners: Modem, VTex 

Software and cable $399.00 

GOLDSOFT 
PO BOX 1742 
SOUTHPORT QLD 4215 
(075) 51-0577 



Tandy 1000 



by Leigh Dawes 



Adder 1b a prograa far young 
children (probably preschool or 

just starting school). Children 
are not all the cana and nuct bo 
treated accordingly when it 
cones to learning. Let then 
learn at their own pace and 
don't push then, teach then. 

Adder was supposed to be a fun 
game for ay daughter. She has 
learnt very well from this short 
simple prograa. 

I used the popular TURBO 



PASCAL to compile the prograa 
but it will probably (with er»ne 
modif lcatlons> conpile on other 
versions of PASCAL. Alter the 
progran to suit the child, and 
dress It up a bit. The graphics 
are not the best, but this Is 
what ny child is accustomed to. 
1 won't change It for now 
because she enjoys that and the 
short sound routine when 6he 
answers correctly. CThat is her 

reward). She Is also used to the 



incorrect sound. I always try 
and use the sane sounds for 
correct and Incorrect so the 
child knows without knowing how 
to read whether it was correct. 

Play around with the program 
and experiment. Modify the 
program to suit the child and 
not you. 

Happy Computing. 

by Leigh Dawes. 

(051)745552 for questions and 

coaments 



program ADDER C INPUT, OUTPUT); 

{Program for my daughter Jacqueline which drills her in adding 
two numbers whos answer doesn't exceed ten, Progran can be modified 
to exceed 10 but Jackie is only four years old.) 



const 



XAXHUM = 9; {maximum number for problem) 

ZERO = 0; {better use this rather than magic numbers.) 

MAXANSVER = 10; {maximum answer allowed) 



type 



RANGE = ZERO. . KAXNUH; {this is the range of numbers we will use.) 



var 



NUJil, 

NUM2, 

NUM3 : RANGE; 

VQLCORTROL, 

ANSVER, 

COUNT, 

NUKTRIES, 

PROBLEMS, 

NUKCORRECT : 

CH : CHAR; 



INTEGER; 



{first number of problem) 

{second number of problem) 

{answer to numl plus num2> 

{volume control: higher number lower volume) 

{the answer from U6er) 



{number of problems attempted so far) 
{number of correct answers so far) 
{character from keyboard) 



procedure POLL; 

{This procedure waits for the return key to be 
pressed before execution is resumed, ) 



var 



CH: CHAR 
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begin <POLL) 

VRITELN; 

VRITE ('Press <ENTER> or <return> to continue. f ); 

READLS CCH> 
end; (POLL) 



procedure CLEARSCREEN; 
begin (CLEARSCREEN) 

CLRSCR <This statement is not supported by standard pascal) 
end; (CLEARSCREEN) 



procedure INTRO; 

begin -CINT30) 

CLEARSCREEH; 

{Display games name) 

VRITELN; 

VRITELN (' Jackie' 'e adding game • ); 

{Poll the keyboard.) 
POLL 
end; < INTRO) 



procedure GETNUM (var NUM1, NUM2 <output) : RANGE); 

{Outputs two random numbers into NUML A NUM2 whoe sun doeen 1 1 exceed 

MAXANSVER) 

begin (GETNUM) 

NUK1 := RANDOM (MAXNUM) + 1; {RANDOM not standard pascal) 

NUM2 : = RANDOM (XAXNUM) + 1 
Gnd: {GETNUM) 



procedure SOUND (SOUND, DEL, VOL : INTEGER); 

(SOUND is the frequency, DEL is the delay factor, and VOL 
is the volume at which the sound i6 played. You may need to leave 
all sound statements out if not supported by your machine) 

const 

SNDREG1 = 192; 
SNDVCL = 150; 
CHGSND = 128; 

var 

COUNT ; INTEGER; 

begin (SOUND) 

{fix the volume first) 
PORT [SNDREG13 := SNDVOL; 
PORT tSNDREGl) ;= VOL; 

(change sound to sound required) 
PORT tSNDREGl] := CHGSND; 
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PORT ESNTREG1) ;= SOUND; 
DELAY (DEL); 
end; {SOUND) 



procedure SOUNEOFF; 

{Switches off oil sounds currently on) 

const 

KI1 = 192; 
KAX = 199; 
var 
REG, 
COURT : INTEGER; 

begin {SOUHDOFF) 

{switch sound off) 
for REG ;= KIN to MAX do 
begin (for) 

PORT CREG) ;= 150; 
PORT [REG] ;= 15 
end; (for) 
end; {SOUNDOFF) 



procedure CORRECT (var NUMCQRRECT (input/output) ; INTEGER); 

{The answer to the problem Bust be correct for control to be here) 

const 

KESSAGE = 'That Is correct. 1 ; 
COLOR = 5; 
MIN = 1; 
MX = 20; 

var 

COUNT : INTEGER; 

XI, X2 ( Yl, Y2 : RA5GE; 

begin {CORRECT) 

{give a graphic display for reward) 

HIRES; {not standard pascal. You may have to leave all graphics out) 

for COUNT := KIN to KAX do 
begin (for) 
repeat 

GETNUMCX1, X2); 
XI := XI * 100; 
X2 := X2 * 100; 
until CXI < 600) and <X2 < 600); 
repeat 

GETNUM (Yl, Y2); 
Yl := Yl * 19 + 40; 
Y2 := Y2 * 19 + 40; 
until (Yl < 191) and (Y2 < 191); 
DRAV <X1, Yl, X2, Y2, COLOR); 
end; (for) 
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{Give a correct sound) 
for COUNT ;= 1 to 30 do 

SOUND (COUNT, 20, V0LC0NTR0L) j 
for COUNT := 30 downto 1 do 

SOUND (COUNT, 20, VOLCONTRQL) ; 

(switch sound off and return to normal video) 
SOUNDOFF; 
LOW I DEO; 

(update number of correct answers.) 
NUMCQRRECT := MUMCORRECT + 1 
end; (CORRECT) 



procedure INCORRECT; 

const 

MESSAGE = 'That is incorrect...'; 

begin (INCORRECT) 
CLEARSCREEI; 
VRITBLH; 
VRITELN (MESSAGE); 

(Output sound to indicate wrong answer,) 
SOUND (03 ( 1000 ( VOLCONTR0L); 
SOUNDOFF 
end; (INCORRECT) 



procedure FROBLEM; 
begin {PROBLEM) 
repeat 

GETNUM (NUM1, N0K2); 
NUM3 := NUK1 + IUK2; 
until NUH3 <= MAXANSVER; 
NUMTRIES := ZERO; 
repeat 

WRITE ('What does ',NUM1 ;Z t ' + ' , NUH2 :2, ' = ') 

READLN (ANSWER); 

if ANSWER = NUM3 then 

CORRECT (NUMCORRECT) 
else 

begin (else) 

INCORRECT; 

NUMTRIES := NUMTRIES + 1; 

if NUMTRIES > 2 then 

WRITELN ('The answer was \ NUM3 :3>( 
end; -(else) 
until (NUMTRIES > 2) or (ANSWER = NUM3); 
end; (PROBLEM) 



procedure INITIALIZERANDOM; 
begin 

RANDOMIZE (not standard pascal statement) 
end; {INITIALIZERANDOM) 
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procedure GAKECQNTROL; 
begin {GAMECONTROD 
repeat 

AKSVER := 0; 

PROBLEM; 

PROBLEKS := PROBLEMS + 1; 

WRITE C'Do you want another? <Y/N> : •); 

repeat 

READ (KBD.CH); 

until (UPCASE(CH)='Y') or (UPCASB<CH) = ' N* ) or <CH =CHRC13>); 

<If carriage retura then treat it as another go.) 
if CH = CHRU3) then 

CH := f V\ 
CLEARSCREEH; 
until CCH = 'N* ) or <CH = 'n') 
end; (GAMECOKTROL) 



procedure ENDGAME; 
begin -(ENDGAME) 

VRITELH C r 0ut of \ PROBLEMS, ' problems you have », HUMCORRECT, • correct.'); 
for COUNT : = 1 to 3 do 
begin {for) 

SOUND (30, 200, VOLCONTROL); 
SOUNDOFF; 
DELAY (20) 
end; (for) 
SOUHD (40, 500, VOLCONTROL) ; 
for COUNT := VOLCONTROL to 15 do 

SOUND (40, 200, COUNT); 
SOUNDOFF 
end; (ENDGAME) 



begin (ADDER) 

INITIALIZERANDOM; 

INTRO; 

HUMCOREECT ;= ZERO; 

PROBLEMS := ZERO; 

VOLCONTROL := 3; 

GAKEC0NTR0L; 

VRITELH; 

ENDGAME; 
end. (ADDER) 



(By Leigh Dawes, (051) 745552 for comments or questions) 
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Splits put CD ROM's 
in cold storage 

CD-I Systems ore based on 
Compact Disk read only memory 

(CD-RQX) technology. They use 
lasers to read these disks 
enabling users to manipulate 
stored text, numerical and 
geographical Information,. 

But the market le already 
showing signs of a split between 
standards and pessimism about 
Its potential Is beginnina; to 
set in. 

They cay that it will be about 
two years until CD-I systems 
start to become standard. 

The bluest problem was to 
develop applications at a low 
enough price to fuel market 
acceptance and growth. 

Up till 1988, a significant 
amount of experimenting will 
take place, and at 1990, the 
first serious applications will 
be out. By 1992 prices should be 
down to about 40S500 and 
individual applications will be 
down to about SUS10. 

The CD—I fornat is sponsored 
by Sony and Phillips, the two 
giants of the CD audio industry. 



Even the Army 
can use Viatel! 

Yes thot bastion of 

conservatism, the Australian 
Army has moved to Viatel f (And 
no, not to 642 unfortunately for 
them! ) 

The' Army selected Viatel 
because of its penetration, and 
because it cart get information 
to people quickly. 

The department will have a 

diary of events, listings of 

contact names atd numbers for 
the federal and state offices, 
and there will be a list of all 
books, video tapes and 

publications of defence 

activities available to the 
public. Gripping stuff eh? 



The CD-I system requires a 

special Phillips chip and uses 

the little known OS-9 operating 
Gysten. 

Vow, doesn't that sound Just 
dandy?? OS-9 is preferred over 
XS-DOS! That would mean a 
significant step towards true 
efficiency. 

People question the scenerio 



CoCo 2 going 
Cheap! 



Tandy's Colour Conputer 11*6 
are going out with a bangl 

You can now Ret the coaputers 
for only $99.95, instead of the 
$299.95 usually paid! 



And now... a FAX 
for your 

T1000/IBM PC 



The Software Corporation of 
Australia has Just released a 
new generation device, the 
KFAX96 - a combination 

coaunlcations protocol device - 
which allows an ordinary PC to 
function as a FAX machine. 

You can use a standard VP 
package to create your message, 
and then send it directly to any 
FAX machine In the worldl 

It can be programed to send a 
document at any time to any 
nunber of pre-defined phone 
nunbers! 

Up to 10000 FAX numbers can be 
programed into the system which 
includes the database software. 

KRP le $1995 (Including Tax) 
and this includes software, 
modem, the FAX card and the 
manual. 

The board is a short one, so 
it will fit the TiOOO. 

Contact us at Goldsoft for 
further Information. 



because it doesn't use the 
"industry standard" of US-DOS. 
This, by the way, is one of the 
several points of objection. 

lot only all that, but other 
biff companies (like Apple % RCA) 
either don't want to hear about 
it or don't want to know It, 
because they want to have their 
own so-called "standard". 



Sy corn's 
Curcuit Breaker 



Sycom's Mains Huffier computer 
protects computer installations 
against aatns voltage surges C r 
high voltage interferences. 

It Includes a 4 amp resettable 
curcuit breaker that snakes 
sensitive computer and 

peripheral gear safer than it it 
is with the large curcuit fuses 
or breakers. 

The system also suit audio and 
video equipment. 

The four-power outlet is $199 
and the two-power outlet is 
$129. 



Sharp Releases 
New PC 

Sharp has released an addition 
to their PC ranxe of computers, 
the PC1425. 

This little machine has 
statistical functions, which 

Include a 24 character display 
and 8K of BAM, expandable to 24K 
using optional RAM cards. 

In the computer mode, a user 
can write programs to solve 

specific probloiEs ucifiR a 

built-in Basic language. 

The PC1425 has a wide range of 
peripherals, including printers, 
RAH cards, and a cassette 

interface. 

The going price? - $346, inc 
tax!. 
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Pacrnaii outwits 
Security guru 



The latest fad tc hit local 
computer security experts is the 
tracking down of illicit 
insertion boards. 

Insertion boards are extra 

ircuit boards that "appear" 

inside computers and are used 

primarily for enhanced hackln* 

activities. 

One firm wanting to seek a few 
examples boasted to a would-be 
client that it had one of the 



insidious devices for display, 
but couldn't give up with the 
goods when it came down to the 
crunch. 

Charging around the office, he 
spied a pacman game (encased in 
an Atari games cartrige), ripped 
open the casing and roared off 
with the board in hand to the 
client. 

The client company was so 
impressed with the sleuthing job 
that it signed up immediately on 
the spot. 

Even today the security guru 
who heads the company wasn' t 
told about the little 

subterfuge! 



Tandy Releases 
Cordless Telephone 



Tandy have just released their 
new cordless telephone! It 
features 32 number memory 
autodial, auto re-dial, 200 
metres range and a whole lot 
morel 

Can be also used as a two-way 
intercom, but with it needinR 
one extra phone. 

The price for s^ek Q 
telephone? Only $329.95 from any 
Taudy etore. 



Sybiz Payroll 
Software 

Sybiz software ha6 released a 
software package designed to 
meet the personnel and payroll 
requirements of those employing 
up to 6,500 staff. 

The Sypay Plus Software runs 
on IBMs or compatible stand 
alone PC's. 

It has pull-down menus and can 
search staff records by number , 
nane, department or award and is 
*795 (ex. tax). 



ROB, the Clayton 
games player 



ROB is a video system that is 
^njoyir.o; overwhelming euccesa In 
the USA and Japan, 

Although it looks promising on 
the outside (robot and all), 
loses appeal when assembled. 

The game involves a TV screen, 
two Joysticks, control deck, a 
zapper and the robot. 

The object of the game Is to 



it 



use ROB, which is pre 
programmed, to beat the game in 
the control deck. 

You 6oon discover it's more 
fuB to get a flesh and blood 
buddy to play against and switch 
of/ the mechanical moron. 

The software left little to be 
desired, and was a little on the 
basic elde. 

But not to worry, you 1 11 get 
30 minutes of mind-numbing 
enjoyment, if nothing else, for 
the mere price of only 1450. 



GOLDLIHK 

a Goldaoffc Service 

*642# 

for 



• Tandy Computer Owners 

• Atari Computer Owners 

• Gold Coast News and Information 

• Rail Enthusiast Information 

• Amateur Radio Information 

• The Viatel Fast Florist 

• Consumer Watch 

• Articles and Reviews 

• Hardware and Software for 

• Your Computer 

• Bulletin Boards 




m 



ELECTRONICS 



(Formerly Bayne & Trembath) 



Best prices available on all 
Tandy computers and accessories. 

Free delivery to 
anywhere in Australia. 

All major credit cards welcome. 



D U T Electronics 

Shop B 1451 Nepean Hwy. Rosebud 3S39 

(059) 86-3134 AH (059) 85-4947 



n 



m 



m 
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MARTHA'S 
Trading Post 



Some of you computer derros have accunulnted so 
■uch Junk In the past few years, you are becoming a 
menace to society ahd a health hazard to your cot. 

This Is your chance to get rid of those unwanted 
bl ts of equipment . 

Place your ad here and I'll leave U on til! your 
st-aa operated nodea or whatever gets eold, or I get 
sick of the sight of your ad. 

Martha 



For Sale: 



a <3o 

$ 40 

1100 
& 25 
S 30 
*"5f> 
U5& 



CoCoMax 1-2 Package 

CoCoTewx I For CoCo 2*3) 

Tandy Pascal Compiler 

Huslca 

P51 Mustang Simulator 

Avtek Multi-Moden (Viatel Corncotoble) 

Tandy DHP100 printer (still in box^ 



All software is original including manuals. 
'Phone David Ly on <067) 7288279 

***** 

For Sale: 
S100: CoCo 2 Hultipack Interface 
H 50: Tandy Deluxe RS232 program oak 

Disk Games (125 each* 
Marble Haze, Paper route, Karate 

Tape Games 
Space Shuttle "Ton Mix) - $10; Qulx (Ton Mix) - 
$20; King Tut (Tom Mix) - $20; Shenanigans (Kark 
Data) - $20; Space Invaders (Spectral) - 420; Los 
Vegas (Prism Software) - 115; Las Vegas Weekend 
(Priekely Pear) - $15; Zaksund (Elite Software) - 
$20; Var of the Worlds (Part 1, 2 4 3) - S40 
Tape Utilities 
VIP Writer (Tape St Manual) r $50; KTD Trio 
(Pragrara transfer Utility: tape to disk to tape 
and, rorp pak transfer programs) - $25 

Fhone Harry on <07) 411314 after 5pm weekdays 
anJ anytime on weekends. 



***♦ 

For Sale: 

I 15: Cessna Lander Flight 
two joysticks. 

Thone (087> 551501 



For Sale; 

$200: 32K ECE Grey CoCo with manuals, inverse 
switch and shift lock; VIP Writer word processing 
program (Disk a Tape); about 200 - 300 programs 
from Rainbow and CoCo including Educational, 
Music, Graphics, Utilities and more! 
Write to: Steve Young,berry, 
PO Box 244, 
Tara. 4421 



tut 



For Sale: 
iMake an Offer: 64K ECB Grey case CoCo with real 
keyboard- It works! 

Phone Adrian Jowett on (002) 302358 (work) 
or (002) 235352 (home) 



tm 



For Sale: 
S30C; TRS-80 Level 2 and Monitor as new with 
instruction "books, etc. 

$20-0: 64K ECB CoCo with manuals, books, etc. 
All in excellent Conditon. 
Phone Roy Jackson (02) 523-3473 



m* 



For Sale: 
$25/$50 for both: "Dinowars" and "Monster Maze", 
2 years old but still In working condition. Bo 
instruction book. $25 for one/ S 50 for both.. 
Fhona Aaron Harwood (Tasmania) 344142 
or write ta 274 Argle St. 

Nth Habart, 7000 



M** 



For Sale: 

$850: Grey case 64K ECB CoCo, HJL 57 Keyboard 
fited (original chicUet keyboard loose), 
composite video and audio output card, power on 
led fitted; CCR 61 cassette recorder; ffEC twin 
disk drives, model PC8032B with controller and RS 
DOS i Rainbow bits DOS chips; original 
Telewriter-64 software on tape and disk, Dynacalc, 
Pro-Color-File and VIP Database an disk; some OS 
Rainbow and CoCoOz on disk and tape, lots of other 
software on tape and di&k; US Rainbow Magazines; 
Program books, etc etc. 

Write to Barry C. Carle, 
1 Vendy St, 
Morrabin, 3189 



4.**! 



Wanted: 

140: Word Processing program for 64K CoCo. Must 
be Tape based. Perhaps somebody with Telewriter 64 
who doesn't need their tape. 1 would be prepared 
to pay 1/2 price of new, say around $40. 

Phone David Phillips on (07) 8072663 evenings 



-M-M 



Wanted: 
Simulatcr. Requires Jraake an offer: Digitizer (prefer DS691 from 
Micro Vorks, but any other will do) 
Call Malcolm Patrick on (086> 457637 

o 
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GOLDSOFT 



P.O. BOX 1742, SOUTHPORT. QLD. 4215 Phone (075) 39-6177 



Goldsoft Price list as at March, 1987 



HARDWARE 

CoCaConnect ion: $206.00 ( ) 

Video Amp: Vith Sound - $35.00 ( 
Without Sound - $25-00 < 
The Probp: 849.95 ( ) 



GOLDL1MK 

Access Goldllnk *642# on Viatel with a 1200/75 
baud modem. Annual subscription: *39.?5 ( ) 

SOFTWARE 

Magazines. Tapes a D1skR 

Australian CoCo (Advanced Programs for your CoCo) 

Magazines: Tape ( > or Disk < ) 

12 Months $39.95 ( ) 12 Months $123.75 < > 

6 Months 524.95 ( ) 6 Months $ 74.25 < > 

1 Month $ 4.50 < > 1 Month $ 16.50 < > 

Softgold (Programs (or your CoCo): 

Magazines Tape ( ) or Disk ( > 

12 Months $39.95 < > 12 Months $123.75 < ) 

6 Months $24.90 < ) Months * 74.25 ( ) 

1 Month $ 4.50 I ) 1 Month $ 16.50 < ) 

Gold Dish - Available Quarterly; 
1 Month: $16.00 * > 



Please tick ts/S your requirements 



BRIC-A-BRAC 

Blank Tapes: 12 9 $18.00 



( > 



(C-30) 
Tape Cases: 



1 9 * 2,00 ( ) 
12 9 $ 5.00 < ) 



Disks D5DD: 10 9 $20.00 < ) 
1 « $ 2.50 < > 

BOOKS 

Help (for your CoCo): $9.95 < ) 
Mlco Help (for your MC-105: $9.95 ( ) 

BACK ISSUES 

Australian CoCo: Sep 84 - Dec 85: $2.00 ( ) 

Australian CoCo: Jan B6 - Feb 87: $3.75 ( ) 

Australian Mlco: Aug 84 - Dae 65; $2.00 < ) 



ADDITIONAL REQVIREKEHTS 



The CoCo3 Tape/Disk: 

* 1 - Tape: $10.00 Disk: 416.00 ( > 

* £ - Tape: $10.00 Disk: $16 00 ( > 

* 3 - TAPE: $10.00 DISK: $IG.00 < > 



"Say tue Words": 

Two Curriculum based speller programs 
your Tandy Speech/Sound Pack: $29.95 
Req. 32K + Tandy Speech Pack ( ) 

Best of CoCoOz - $16.00 
A selection of prograas froa Australian 
CoCo Magazine. 

Tape: Disk: 



for 



#10 



Education 
Ganes 16K 
Games 33K 
Utilities 
Business 

Adventure 

Preschool 
Graphics 
Games 16K 
Cases 32K 
Education 
Education 



< ) 
( ) 
C ) 
( > 
( ) 
( ) 
C ) 
( ) 
( ) 
( ) 



New Subscription: ( ) Renewal: < ) 
Sub Bo: 

Haae: 

Address; ..,,,,,,., .,,,.,. 






P/Code 



Phone; ( 



Please find enclosed: 

a. Cheque < ) 

b. Honey Order < ) 

c. Credit Cord < ) 

Credit Card Type a Humber: 

Bankcard \ ); - 

Visa < ): - 

Mastercard ' ): , - 

Expiry Date: /. . . 

Author lsed Amount: $ 

Signed: 




*-j? 



ACT: 

cue cm bth 

CAHBBRRA BTH 

Htfi 

STORE! : 

baiistovi 
blacitovi 
ca1liigp0rd 
chatsvood 



JCKI BORGBB 062 58 3924 
L$B THURBOH 062 68 0226 



NT DORSET! 

U1TH GALLAGHER 

BCEXO KUI 

BILL 0' DQflBLL 



COLTTOH ESBUI PEEDRIKSSOB 
PA1RFIEL0 AETB PITTAED- 

GLADBSV1LLB IABI ROTHVRLL 

■ILLS DIET ARTHUR GLADE 

HOBJSBT ATRAL1B SUIT 

IBCLBBBSR STEPHBI RIDGBHAT 
IEHTH0R5T TOR STUART 

LBICEHAKDT STEVEI CBICOfi 

or COKE SCHECARAT 
LIVERPOOL LEOIIE DUGOAB 

HACQUAR3B FIELDS 

BARRT DARI70I 




XT ISA 

HURGQI 

ROCKHIHPTOI 

TUU 

TOOVOOHBA 

TOWSTILU 



JACI BAB 077 *3 3483 

PRTHR ABGBL 071 68 1B2A 

EEIBAI SlRPSOI 07? 20 6162 

DEBBI8 DORPIELD 074 65 3177 

LBI GBRSBIOVBII 076 33 6264 

JOHJ O'CALLAGHAB 077 73 2064 



■IITO 
SETHH8LAID 
STDIET BAST 

ALBOHT 

ABX1DALS 

BLAXLAID 

SRCKBI BILL 

CAHDBB 

COPFS 8ABBOTR 

COOKA 

COQRAIBOIC 

C00IARV1DRA 

DEIILIQ01I 

DtlBBO 

FORBES 

COSPOBD 

GRAFTDR 

ODIBl 

jobee 

ISXPSBT 

LEETOI 

LISAQRE 

L1TKGOV 

HAITLAID 

XORBE 

RUDGHE 

BAHBOCCA HDS 

BABROmiB 

BgVCASTLB 

nu 

PARIES 

PORT RACQUAR1E 

SPBIBGVOQD 

TABROOR 

OPPBB HOTTER 

ORALLA 

VAGGA VAGOA 

VVOIG 



GRAHAX POLLCCX 

III AriABBL 

JACKT COCK I BOS 

R3B DOBCAI 

tXKKi 6ABBBR 

BBUCB SULLIVAB 

TS8ST IOCIAI 

SBAI RUSDCCH 

BOB RESIT 

BOSS PRATT 

GE08GE SAVAGE 

CHERIX V1LLIS 

VATBE PATTSRSOI 

CRAEKE CLARIS 

JOHUIA TAW 

PHTB3 SB1PRBT 

PETER. tilOSAT 

KICHAIL J . HAKTB1BB 

PA 01 HALOBBT 

BICI PULLER 

BRETt WALLACE 

BOB HIUARD 

DAVID BSRCER 

BILL SROV 

ALP BATS 

3PLAI STORE 

VEBD-T PETERSOI 

GRABKE CLABIE 

LIB DAVSOI 

hoy LOPEZ 

i- A . : r suii 

ROB LALOB 

JIB HOPPITI 

GARY STLVBSTER 

TERRT CRAVOLII 

FRAHX BUDfOBD 

CES .'BRXIBSOB 

J OBI WALLACE 



02 618 1009 
02 603 5028 
02 528 3301 
02 344 9111 
060 43 1031 
007 12 FMT 
047 30 3003 
080 69 2302 
047 74 8291 

066 51 2205 

064 52 3065 
040 77 1054 
069 12 2204 
058 Bl 3014 
068 SO 6540 
068 52 2043 

043 32 7874 
OM 42 2303 

067 79 7547 
060 24 1660 
065-82-7222 
060-53-2061 
086 24 3060 
063 52 2262 
049 66 2357 

067 52 2465 
063-72-1958 

065 68 «23 

068 89 6540 
040 49 8144 

044 46 5440 
068 52 2682 
065 63 8223 
047 54 1474 
046 61 0318 
065 45 lWfl 
067 78 4301 
060 25 2263 
043 94 0312 



interest 
qroups 



TEACHERS' IHTEREST GROW 
BRISBARE BOB HOBIE 07 281 8151 



BITSIBES5: 
BPIZBIZ 



BR1AH BERE-BTREETEF 0? 349 4696 



os9 groups: 

iatiobal oso usees' group 

graehx iichols 02 451 2954 
bSV 
stdbet" 

baiistovi , carl steri 02 643 3319 

carlibcford rosso jkkat 02 624 3353 

cladesville bark bothvell 02 817 4627 
stdiet bast jack! cccriios 02.344.0111 
ccoha ross pratt 064 52 3063 

OLD 

BRISBABE 



JAC* FR1CXKE 07 262 886" 



Eft 
OAHVlB 

G/_D: 
3RISBAIE: 
BIRKDALE 
CLAYPIBLD 
COLL'VCOD PI 
IPSVICH 
PIIE RIVERS 
BOOTH VEST 
SABDGATB 
CCABBOROUGB 
VOODRIDGB 
ilBLIB BSACK 
E1CGBBDBI 
SOVEI 
BUHDABEK 
CA1RIS 
ML8T 
GLADSTOHE 
03LD COAST 
0TKPI8 
HER VET BAT 
WCUT 
MARTBOBOUCB 



BFEirOB PRIOR 0fi9.fll.7T60 



COL IB IDRIH 07 824 2128 

JACK PRICKER 07 232 8869 

AIDBEV SIKPSCB 07 288 5206 

KICK HORFHY 07 271 1777 

BARRT CLABE OT 204 2806 

BOB DEVRIES 07 372 7616 

MARK KICHEU, 07 289 3846 

PBTBB RAT 07 203 6723 

ALLAI ALLSOP 07 349 1831 

GLEI EVAE 070 46 1264 

ALAI HEJHA* 071 27 1272 

TERRT COTTOB C/3 077 83 3220 

SOI SIHFKII 071 71 MOl 

JEFF LARSEI 070 54 7127 

KERR1CI TAJSiT 074.62.3228 

CAROL CATHCART 079 78 3594 

GRAJUB HORPBE7T 075 51 ©577 

BBHT LLOT3 071 8219100 

LESLET HORVOOD 071 22 4969 

LBI BALOIBY 079511333K782 

JOHB BPPBI 071 21 6638 



Sir 

ADELAIDE 

MORrEETT TALB 
PORT BOARLDBGA 
SBACOHBB BTS 

FORT LIICOLB 

PORT PIBII 

BHTALU 



JOHJ HAIKS 06 278 3560 

Iff SICMUS 08 304 4503 

ROB DALZELL 08 386 164T 

GLEHB OAT IS 06 296 7477 

BILL BOARDIUI 0O6 62 2383 

TIC UAUBRHASE 086 32 1230 

XALCOU PATRICK 003 43 7637 



VIC 

LATROBE VLT 
VA 
EALGOORLIB 

HC-10 COBTACTS: 
LI SNORE 
STDIET 

VARRIAKaOJL 



nPOBr.B FSAJtClE 
TRBRT BDRISn 



BOB HILLARD 

GRAHAH POLLCCI 

GAR! FURR 



TABDT 1000 / K5 DOS: 
ISV: 

CLADESVELLB 

STDBE7 VESt 

VYOBG 
QLD: 

fiRISGAIE 
BORTH 
BOOT! 

COLD COAST 
SA 

PORT L1ICOLI 

net 

LA TROBE VALLET PETER POU1 



"MARI ROThtfELL 
ROGER RUTHEI 

JO&H VALUA.CE 



BR1AB DOPG1I 
BARRT CAVL8T 

GRABAR RORPffEn 



«1 3i 6176 
0)90.21.5212 



066 24 3089 
02 603 5028 
055 Q2 7440 



02 617 4627 
047.39.3903 

043 90 031? 



07 30 2072 
07 390 7946 
075 51 0577 



SILL BOARD-ftil 066 82 2305 



MELBOURIE 

PORTR: 

CYDBET 

ROBOTICS: 
GOLD COAST 
STDIBY 



TORT LLOTD 



051 74 3791 
03 662 4664 



JOHB B6DHUIU 02 65 3751 



GRAtlAA HORPHB1T 
GEOFP PI At A 

CHKISTIAB USERS' GROUP: 

COLLIE RATHOBD L. ISAiC 



075 51 0577 
02 64 3 172 



KS1 

FBABKSTOR 



097 34 1578 
ALAB HASSELL 03 786 6200 
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TAff: 

DB70IPM; 

HO BART 

IIJGSTOH 

LAUICESIOI 

SBIIBTOH 

VTIIiRI} 



J EFT 1BST 0t>4 24 6750 

BOB DELBOURGO 002 25 3896 

VIH DB PtfU 002 29 4950 

BILL BOVER 003 44 1564 

HARRT CHRISAFIS 004-52-1500 

AIDSBW VTLLIB 004 35 1639 



VIC- 

kfltbOUBHE; 

KBLEOURJS CCC 

DA1DEIQ1G 

OOBCiSTgR 

FRABISTOI 

1AKSE VARREJ 

RTTB IASTERB 

SITOI 

RIBGVOOD 

SUSBCRT 

SOISFIIE 

OPR F'TRHB CLT 
BAIRBSIALE 
BALUKAT 
DATLESFORD 
GERLOBG 
KAFFRA 



KORX1BGTOB 

MORVEU 

SHERPARTOl 

sHrraEsjALB 

SVAH HILL 
TOKALA 

THAEALGOH 
W1THAGGI 

VAi 

PSRIH 
OIRRAVIBEB 

EUQQ0KI8 



JOT VALLACB 

DATID BURROCKS 
JD8T1H LIPTOI 
BOB BATTER 
LBIGB BAKES 
P8TER WOOD 
JURIO GBRADA 
IVOR DAV1BS 
JACI SHIT 
1AB BQTTRISS 
RORT DOTLB 
COL I I LBBRARI 
XARK BSFELABDBR 
DABTT HEDJI 
DAVID COLLHB 
MAX HUCIERBT 
JOSEPH HESTER 
BICHAEL ROBOC 
JEFF SHEER 
ROSS PARRAF 
T0B7 PATTBRSOB 
BARRIB OBRRAHO 
TORT BILL IS 
LBIGH DAVES 
LOIS O'XEARa 



03 277 
03 ?07 
03 «7 
03 . 763 
03 704 
03 435 
03 743 
03 758 
03.744, 
03 314 
03 758 

051 37 

053 J2 

054 24 

052 43 
03L 45 
051 27 
03 789 
051 33 
056 25 

053 42 
050.32. 
056 59 
051 74 
656 B 



5182 
5670 
51 4f 
9746 
6680 
2018 
1323 
4496 
.1355 
3240 
2671 
1545 
6733 
6320 
2128 
4313 
7617 
7907 
0904 
1007 
6813 
2836 
2251 
5552 
1503 



IAII R4CLBOD 09 448 2336 
UAHI VILLEHSBE 09 342 7639 

TBRRT BURBRTT 000.31.5212 



CABADA - CoCo: 
OnWio Richard Botaon 416 293 2346 

Toronto Frsoz Ltcbt*&t*rg 416 643 2689 



300 BA&D BOLLETlr BOARDS 



STDBHT: 

IBPOCBITRg 

TAHDT ACCESS 

THB COCQCOREBCTIOH 
R0B1RT 

HUB 



02 344 0511 
02 825 eon 
02 616 3391 

002 49 4403 



TUT EL 
HOUSBTBr 

nx 4ooo 



VIDEOTEX STSTSRS 



TA1DT IBPO 01 V 
COLDLIBI 
PARIS R1DI0 

POVSR COOB 
TARDT 



01055 
059 42 H526 
03 741 3299 

IATBL 

VIATBL I642ff 
TUTU 444268* 
VIATBL *«4265# 
VIATEL U426U 



SOJCB IABDT USERS OH VIAm 
ALLAI BULB 
FRBDB1SSBLIB0 
JACR FRICRBR 
JOHH GRIOSBV 
STUART BALL 
BOB KEIir 
JEFP LAISBI 
IAIH XACLBOD 
CBRCS R10LB 
RICHARD PABXHURST 
ROSS i tf-ri 
RICCAT SCHHAHL 
ARTHUR Si. ADE 
DARCT O'TOOLB 
ROB VBICRT 



726353300 
648232630 
7 26(66690 
045872030 
B3976S790 
665U22050 
705471270 
944621380 
869523360 
260717670 
646S3O660 
293151300 
262289400 
755105770 
352A24510 



DIRcctory 



Insertions In lh!s Directory cost $160 00 
for six months or $300 00 for twelve months 
p*r frame. Changes to Insertions Incur a 
further charge. 

If you sell Soft or Hardware for Tandy 
computers, you need to be listed In this quick 
reference guide 

Remember! Tandy owners READ this 
magazine! 

■NSW. Gunnedah 



NSW — 
Central Coast 

Computar WUaroVy 
PO Box 979. 

Goaford NSW 2250 

» frfuceltonar Softw»'a 
ComffluAlfifinfl Sotlwmn 

Aoaftfs for Compirtar Mwl 
« A0tn» 'or Spaacft 

* Prompt. Courteous 

San-fee 

• Prions or Wrlta lot 
Catalog i#a 

Sa^Ct'd * VIM C»rO «•- ■ 

043-247293 



N.S.W. Llsmorei 

Oacro Et«c Ironic Sa*rk*a 
1? Csrrlnrjton Si . 
Usmo'fl, NSW 2*80 
(Tandy Daalar 9225) 



Bail lingo of Computers 

and Computing Equipment 

in Summorlind 

Whatnar you live on ina 

North Comi. or ara |usi on 

holidays, you can't a'lord 

' to fan and sm m< 




066-32-1896 






EairWs Sports a 
Baclronlcs 
loflConadillySl, 
Gunnedah NSW 238C 
(Tandy Dealer 9223) 

Agricultural 

[computing Specialists 

Foe Fru>nJW Servke to 

Se man on rhe (and or 

or fast act urate help to 

the \c**m dwellers 

067 42-2230 



South Australians 

Morphettvale 

NATIONAL 

UtTIME ADVEBltSEO 

THE PROFIT POTENTIAL 

IN YOUR 

PERSONAL COMPUl ER 

$25,000 PER MONT M 

IS POSSIBLE 

For FREE Bcocnura 

Hi W) 382 7281 

or sand SSAE lo 

Mai P Ballsy. 

6 Bower Crt. 

(Dopl 7) Morpriattvnla 

South AusitslU S162 



Victor!. 

Blackburn 



OIL Wllecn A Co Pry 

6 Stafford Si , 
Blackburn. Vic 3130 



Lio" 



S*rv*r>f Mflbouiw'i Eesl 
Software - HoiMlrrd. at 

MUh 

Itifdwin — Drive*. 

PrteUts 
S*rv4c« — Upflii4r« 



03-898-4521 



(Tasmania 
Hobart 

Tn* DajtboviQoa 
15 Wlllo*d«na Ava 
Sandy Bay 
Moban Tao 7006 



P* 

bet »#r tasJc for your CoCo 

* r*# Prpportiona* — a 

ui/r/f f to a w orapa aouaf 

0«ps berfireon propclJona/ 

/attem on r«fto>'s 0MPM9 

pWnfar 

* afsf namartcar 'wac1«o* 

tfifieasa 



002 25 3896 



JUST 
RELEASED 




ifjra 



DISK/TAPE 



U1TIS1 ''! 

,., i tHTZEE 

IKES tlSSION 

lAl'E $10.00 
DISK 81G.0U 

nil able I 
FT 
I'm l.wi\ L742 
SOl'THP< 







.. 




■Queensland 
Brisbane 

QuMnaiaixl Cotovr 



PO Box 308 

Cla/liajkl Qld 4011 

•a 90 column cavtfaj 
<t r»Nai 
4 OWnaa 

<t Tavm/n*/ program « 

07 * 262 « 8869 

A/H 



Computer Assembly 

Manuals 

am ai uc sarco for 

MaMeM auuoc»s 

' pin* hit 

* placemen! diagrams 

' instruction* 
tot i*%emhl<ng o. 
bate IBM com pit 
Now includes guide* lor 
b4QK Turbo* AT MfhftoV 
JIMS US 

McnevOrdei VI5A7MC 

NuScope Associates IC 

PO Boi 7*1 Sin B 

Willuwdair. Onlano 




cam. sTATiDn bqe 



ON 






rt/lATEl 






